home *** CD-ROM | disk | FTP | other *** search
/ Developer CD Series 1997 January: Mac OS SDK / Dev.CD Jan 97 SDK1.toast / Development Kits (Disc 1) / QuickTime / Programming Stuff / QuickTime 2.1 for Developers / Interfaces / AIncludes / Movies.a < prev    next >
Encoding:
Text File  |  1995-08-07  |  115.5 KB  |  6,197 lines  |  [TEXT/MPS ]
  1. ;
  2. ;    File:        Movies.a
  3. ;
  4. ;    Contains:    QuickTime interfaces
  5. ;
  6. ;    Version:    
  7. ;
  8. ;    DRI:        Jim Batson
  9. ;
  10. ;    Copyright:    © 1984-1994 by Apple Computer, Inc.
  11. ;                All rights reserved.
  12. ;
  13. ;    Warning:    *** APPLE INTERNAL USE ONLY ***
  14. ;                This file may contain unreleased API's
  15. ;
  16. ;    BuildInfo:    Built by:            QuickTime
  17. ;                With Interfacer:    1.1d11  
  18. ;                From:                Movies.i
  19. ;                    Revision:        0
  20. ;                    Dated:            08/07/95
  21. ;                    Last change by:    JB
  22. ;                    Last comment:    This is a fake header used so interfacer is happy.
  23. ;
  24. ;    Bugs:        Report bugs to Radar component “System Interfaces”, “Latest”
  25. ;                List the version information (from above) in the Problem Description.
  26. ;
  27. ;
  28.  
  29.     IF &TYPE('__MOVIES__') = 'UNDEFINED' THEN
  30. __MOVIES__ SET 1
  31.  
  32.  
  33.     IF &TYPE('__QUICKDRAW__') = 'UNDEFINED' THEN
  34.     include 'Quickdraw.a'
  35.     ENDIF
  36. ;        include 'Types.a'                                            ;
  37. ;            include 'ConditionalMacros.a'                            ;
  38. ;        include 'MixedMode.a'                                        ;
  39. ;        include 'QuickdrawText.a'                                    ;
  40.  
  41.     IF &TYPE('__ALIASES__') = 'UNDEFINED' THEN
  42.     include 'Aliases.a'
  43.     ENDIF
  44. ;        include 'AppleTalk.a'                                        ;
  45. ;            include 'OSUtils.a'                                    ;
  46. ;                include 'Memory.a'                                    ;
  47. ;        include 'Files.a'                                            ;
  48.  
  49.     IF &TYPE('__EVENTS__') = 'UNDEFINED' THEN
  50.     include 'Events.a'
  51.     ENDIF
  52.  
  53.     IF &TYPE('__MENUS__') = 'UNDEFINED' THEN
  54.     include 'Menus.a'
  55.     ENDIF
  56.  
  57.     IF &TYPE('__COMPONENTS__') = 'UNDEFINED' THEN
  58.     include 'Components.a'
  59.     ENDIF
  60.  
  61.     IF &TYPE('__IMAGECOMPRESSION__') = 'UNDEFINED' THEN
  62.     include 'ImageCompression.a'
  63.     ENDIF
  64. ;        include 'QDOffscreen.a'                                    ;
  65. ;            include 'Errors.a'                                        ;
  66. ;        include 'Windows.a'                                        ;
  67. ;            include 'Controls.a'                                    ;
  68. ;        include 'StandardFile.a'                                    ;
  69. ;            include 'Dialogs.a'                                    ;
  70. ;                include 'TextEdit.a'                                ;
  71.  
  72. MovieFileType                    EQU        'MooV'
  73.  
  74. MediaHandlerType                EQU        'mhlr'
  75. DataHandlerType                    EQU        'dhlr'
  76.  
  77. VideoMediaType                    EQU        'vide'
  78. SoundMediaType                    EQU        'soun'
  79. TextMediaType                    EQU        'text'
  80. BaseMediaType                    EQU        'gnrc'
  81. MPEGMediaType                    EQU        'MPEG'
  82. MusicMediaType                    EQU        'musi'
  83. TimeCodeMediaType                EQU        'tmcd'
  84. SpriteMediaType                    EQU        'sprt'
  85. HandleDataHandlerSubType        EQU        'hndl'
  86.  
  87. VisualMediaCharacteristic        EQU        'eyes'
  88. AudioMediaCharacteristic        EQU        'ears'
  89.  
  90. DoTheRightThing                    EQU        0
  91.  
  92. MovieRecord             RECORD    0
  93. data                     ds.l    1
  94. sizeof                     EQU    *
  95.                         ENDR
  96.  
  97. ; typedef struct MovieRecord  MovieRecord, *Movie
  98. TrackRecord             RECORD    0
  99. data                     ds.l    1
  100. sizeof                     EQU    *
  101.                         ENDR
  102.  
  103. ; typedef struct TrackRecord  TrackRecord, *Track
  104. MediaRecord             RECORD    0
  105. data                     ds.l    1
  106. sizeof                     EQU    *
  107.                         ENDR
  108.  
  109. ; typedef struct MediaRecord  MediaRecord, *Media
  110. UserDataRecord             RECORD    0
  111. data                     ds.l    1
  112. sizeof                     EQU    *
  113.                         ENDR
  114.  
  115. ; typedef struct UserDataRecord  UserDataRecord, *UserData
  116. TrackEditStateRecord     RECORD    0
  117. data                     ds.l    1
  118. sizeof                     EQU    *
  119.                         ENDR
  120.  
  121. ; typedef struct TrackEditStateRecord  TrackEditStateRecord, *TrackEditState
  122. MovieEditStateRecord     RECORD    0
  123. data                     ds.l    1
  124. sizeof                     EQU    *
  125.                         ENDR
  126.  
  127. ; typedef struct MovieEditStateRecord  MovieEditStateRecord, *MovieEditState
  128. SampleDescription         RECORD    0
  129. descSize                 ds.l    1
  130. dataFormat                 ds.l    1
  131. resvd1                     ds.l    1
  132. resvd2                     ds.w    1
  133. dataRefIndex             ds.w    1
  134. sizeof                     EQU    *
  135.                         ENDR
  136.  
  137. ; typedef struct SampleDescription  SampleDescription, *SampleDescriptionPtr, **SampleDescriptionHandle
  138. SpriteWorldRecord         RECORD    0
  139. data                     ds.l    1
  140. sizeof                     EQU    *
  141.                         ENDR
  142.  
  143. ; typedef struct SpriteWorldRecord  SpriteWorldRecord, *SpriteWorld
  144. SpriteRecord             RECORD    0
  145. data                     ds.l    1
  146. sizeof                     EQU    *
  147.                         ENDR
  148.  
  149. ; typedef struct SpriteRecord  SpriteRecord, *Sprite
  150. ; typedef Handle             QTAtomContainer
  151. ; typedef long                 QTAtom
  152. ; typedef long                 QTAtomType
  153. ; typedef long                 QTAtomID
  154. SoundDescription         RECORD    0
  155. descSize                 ds.l    1                                    ; total size of SoundDescription including extra data 
  156. dataFormat                 ds.l    1                                    ;  
  157. resvd1                     ds.l    1                                    ; reserved for apple use 
  158. resvd2                     ds.w    1
  159. dataRefIndex             ds.w    1
  160. version                     ds.w    1                                    ; which version is this data 
  161. revlevel                 ds.w    1                                    ; what version of that codec did this 
  162. vendor                     ds.l    1                                    ; whose  codec compressed this data 
  163. numChannels                 ds.w    1                                    ; number of channels of sound 
  164. sampleSize                 ds.w    1                                    ; number of bits per sample 
  165. compressionID             ds.w    1                                    ; sound compression used, 0 if none 
  166. packetSize                 ds.w    1                                    ; packet size for compression, 0 if no compression 
  167. sampleRate                 ds.l    1                                    ; sample rate sound is captured at 
  168. sizeof                     EQU    *
  169.                         ENDR
  170.  
  171. ; typedef struct SoundDescription  SoundDescription, *SoundDescriptionPtr, **SoundDescriptionHandle
  172. TextDescription         RECORD    0
  173. descSize                 ds.l    1                                    ; Total size of TextDescription
  174. dataFormat                 ds.l    1                                    ; 'text'
  175. resvd1                     ds.l    1
  176. resvd2                     ds.w    1
  177. dataRefIndex             ds.w    1
  178. displayFlags             ds.l    1                                    ; see enum below for flag values
  179. textJustification         ds.l    1                                    ; Can be: teCenter,teFlush -Default,-Right,-Left
  180. bgColor                     ds        RGBColor                            ; Background color
  181. defaultTextBox             ds        Rect                                ; Location to place the text within the track bounds
  182. defaultStyle             ds        ScrpSTElement                        ; Default style (struct defined in TextEdit.h)
  183. defaultFontName             ds.b    1                                    ; Font Name (pascal string - struct extended to fit) 
  184. sizeof                     EQU    *
  185.                         ENDR
  186.  
  187. ; typedef struct TextDescription  TextDescription, *TextDescriptionPtr, **TextDescriptionHandle
  188. DataReferenceRecord     RECORD    0
  189. dataRefType                 ds.l    1
  190. dataRef                     ds.l    1
  191. sizeof                     EQU    *
  192.                         ENDR
  193.  
  194. ; typedef struct DataReferenceRecord  DataReferenceRecord
  195. ; typedef DataReferenceRecord  *DataReferencePtr
  196. ;--------------------------
  197. ;  Music Sample Description
  198. ;--------------------------
  199. MusicDescription         RECORD    0
  200. descSize                 ds.l    1
  201. dataFormat                 ds.l    1                                    ; 'musi' 
  202. resvd1                     ds.l    1
  203. resvd2                     ds.w    1
  204. dataRefIndex             ds.w    1
  205. musicFlags                 ds.l    1
  206. headerData                 ds.l    1                                    ; variable size! 
  207. sizeof                     EQU    *
  208.                         ENDR
  209.  
  210. ; typedef struct MusicDescription  MusicDescription
  211. ; typedef MusicDescription     *MusicDescriptionPtr
  212. ; typedef MusicDescriptionPtr  *MusicDescriptionHandle
  213.  
  214. dfDontDisplay                    EQU        1 << 0                ; Don't display the text
  215. dfDontAutoScale                    EQU        1 << 1                ; Don't scale text as track bounds grows or shrinks
  216. dfClipToTextBox                    EQU        1 << 2                ; Clip update to the textbox
  217. dfUseMovieBGColor                EQU        1 << 3                ; Set text background to movie's background color
  218. dfShrinkTextBoxToFit            EQU        1 << 4                ; Compute minimum box to fit the sample
  219. dfScrollIn                        EQU        1 << 5                ; Scroll text in until last of text is in view 
  220. dfScrollOut                        EQU        1 << 6                ; Scroll text out until last of text is gone (if both set, scroll in then out)
  221. dfHorizScroll                    EQU        1 << 7                ; Scroll text horizontally (otherwise it's vertical)
  222. dfReverseScroll                    EQU        1 << 8                ; vert: scroll down rather than up; horiz: scroll backwards (justfication dependent)
  223. dfContinuousScroll                EQU        1 << 9                ; new samples cause previous samples to scroll out 
  224. dfFlowHoriz                        EQU        1 << 10                ; horiz scroll text flows in textbox rather than extend to right 
  225. dfDropShadow                    EQU        1 << 12                ; display text with a drop shadow 
  226. dfAntiAlias                        EQU        1 << 13                ; attempt to display text anti aliased
  227. dfKeyedText                        EQU        1 << 14                ; key the text over background
  228. dfInverseHilite                    EQU        1 << 15                ; Use inverse hiliting rather than using hilite color
  229.  
  230. searchTextDontGoToFoundTime        EQU        1 << 16
  231. searchTextDontHiliteFoundText    EQU        1 << 17
  232. searchTextOneTrackOnly            EQU        1 << 18
  233. searchTextEnabledTracksOnly        EQU        1 << 19
  234.  
  235. ; progress messages 
  236. movieProgressOpen                EQU        0
  237. movieProgressUpdatePercent        EQU        1
  238. movieProgressClose                EQU        2
  239.  
  240. ; progress operations 
  241. progressOpFlatten                EQU        1
  242. progressOpInsertTrackSegment    EQU        2
  243. progressOpInsertMovieSegment    EQU        3
  244. progressOpPaste                    EQU        4
  245. progressOpAddMovieSelection        EQU        5
  246. progressOpCopy                    EQU        6
  247. progressOpCut                    EQU        7
  248. progressOpLoadMovieIntoRam        EQU        8
  249. progressOpLoadTrackIntoRam        EQU        9
  250. progressOpLoadMediaIntoRam        EQU        10
  251. progressOpImportMovie            EQU        11
  252. progressOpExportMovie            EQU        12
  253.  
  254. mediaQualityDraft                EQU        $0000
  255. mediaQualityNormal                EQU        $0040
  256. mediaQualityBetter                EQU        $0080
  257. mediaQualityBest                EQU        $00C0
  258.  
  259. ; typedef ComponentInstance  MediaHandler, DataHandler
  260. ; typedef Component         MediaHandlerComponent, DataHandlerComponent
  261. ; typedef ComponentResult     HandlerError
  262. ; typedef long                 TimeValue
  263. ; typedef long                 TimeScale
  264. ; typedef wide                 CompTimeValue
  265.  
  266. loopTimeBase                    EQU        1
  267. palindromeLoopTimeBase            EQU        2
  268. maintainTimeBaseZero            EQU        4
  269.  
  270. ; typedef unsigned long     TimeBaseFlags
  271. TimeBaseRecord             RECORD    0
  272. data                     ds.l    1
  273. sizeof                     EQU    *
  274.                         ENDR
  275.  
  276. ; typedef struct TimeBaseRecord  TimeBaseRecord, *TimeBase
  277. CallBackRecord             RECORD    0
  278. data                     ds.l    1
  279. sizeof                     EQU    *
  280.                         ENDR
  281.  
  282. ; typedef struct CallBackRecord  CallBackRecord, *QTCallBack
  283. TimeRecord                 RECORD    0
  284. value                     ds.l    2                                    ; units 
  285. scale                     ds.l    1                                    ; units per second 
  286. base                     ds.l    1
  287. sizeof                     EQU    *
  288.                         ENDR
  289.  
  290. ; typedef struct TimeRecord  TimeRecord
  291. ; CallBack equates 
  292.  
  293. triggerTimeFwd                    EQU        $0001                ; when curTime exceeds triggerTime going forward 
  294. triggerTimeBwd                    EQU        $0002                ; when curTime exceeds triggerTime going backwards 
  295. triggerTimeEither                EQU        $0003                ; when curTime exceeds triggerTime going either direction 
  296. triggerRateLT                    EQU        $0004                ; when rate changes to less than trigger value 
  297. triggerRateGT                    EQU        $0008                ; when rate changes to greater than trigger value 
  298. triggerRateEqual                EQU        $0010                ; when rate changes to equal trigger value 
  299. triggerRateLTE                    EQU        triggerRateLT | triggerRateEqual
  300. triggerRateGTE                    EQU        triggerRateGT | triggerRateEqual
  301. triggerRateNotEqual                EQU        triggerRateGT | triggerRateEqual | triggerRateLT
  302. triggerRateChange                EQU        0
  303. triggerAtStart                    EQU        $0001
  304. triggerAtStop                    EQU        $0002
  305.  
  306. ; typedef unsigned short     QTCallBackFlags
  307.  
  308. timeBaseBeforeStartTime            EQU        1
  309. timeBaseAfterStopTime            EQU        2
  310.  
  311. ; typedef unsigned long     TimeBaseStatus
  312.  
  313. callBackAtTime                    EQU        1
  314. callBackAtRate                    EQU        2
  315. callBackAtTimeJump                EQU        3
  316. callBackAtExtremes                EQU        4
  317. callBackAtInterrupt                EQU        $8000
  318. callBackAtDeferredTask            EQU        $4000
  319.  
  320. ; typedef unsigned short     QTCallBackType
  321.  
  322. qtcbNeedsRateChanges            EQU        1                    ; wants to know about rate changes 
  323. qtcbNeedsTimeChanges            EQU        2                    ; wants to know about time changes 
  324. qtcbNeedsStartStopChanges        EQU        4                    ; wants to know when TimeBase start/stop is changed
  325.  
  326. QTCallBackHeader         RECORD    0
  327. callBackFlags             ds.l    1
  328. reserved1                 ds.l    1
  329. qtPrivate                 ds.b    40
  330. sizeof                     EQU    *
  331.                         ENDR
  332.  
  333. ; typedef struct QTCallBackHeader  QTCallBackHeader
  334. QTSyncTaskRecord         RECORD    0
  335. qLink                     ds.l    1
  336. proc                     ds.l    1
  337. sizeof                     EQU    *
  338.                         ENDR
  339.  
  340. ; typedef struct QTSyncTaskRecord  QTSyncTaskRecord, *QTSyncTaskPtr
  341.  
  342. keepInRam                        EQU        1 << 0                ; load and make non-purgable
  343. unkeepInRam                        EQU        1 << 1                ; mark as purgable
  344. flushFromRam                    EQU        1 << 2                ; empty those handles
  345. loadForwardTrackEdits            EQU        1 << 3                ;    load track edits into ram for playing forward
  346. loadBackwardTrackEdits            EQU        1 << 4                ;    load track edits into ram for playing in reverse
  347.  
  348. newMovieActive                    EQU        1 << 0
  349. newMovieDontResolveDataRefs        EQU        1 << 1
  350. newMovieDontAskUnresolvedDataRefs EQU        1 << 2
  351. newMovieDontAutoAlternates        EQU        1 << 3
  352.  
  353. ; track usage bits 
  354. trackUsageInMovie                EQU        1 << 1
  355. trackUsageInPreview                EQU        1 << 2
  356. trackUsageInPoster                EQU        1 << 3
  357.  
  358. ; Add/GetMediaSample flags 
  359. mediaSampleNotSync                EQU        1 << 0                ; sample is not a sync sample (eg. is frame differenced 
  360. mediaSampleShadowSync            EQU        1 << 1                ; sample is a shadow sync 
  361.  
  362. pasteInParallel                    EQU        1
  363. showUserSettingsDialog            EQU        2
  364. movieToFileOnlyExport            EQU        4
  365. movieFileSpecValid                EQU        8
  366.  
  367. nextTimeMediaSample                EQU        1 << 0
  368. nextTimeMediaEdit                EQU        1 << 1
  369. nextTimeTrackEdit                EQU        1 << 2
  370. nextTimeSyncSample                EQU        1 << 3
  371. nextTimeStep                    EQU        1 << 4
  372. nextTimeEdgeOK                    EQU        1 << 14
  373. nextTimeIgnoreActiveSegment        EQU        1 << 15
  374.  
  375. ; typedef unsigned short     nextTimeFlagsEnum
  376.  
  377. createMovieFileDeleteCurFile    EQU        1 << 31
  378. createMovieFileDontCreateMovie    EQU        1 << 30
  379. createMovieFileDontOpenFile        EQU        1 << 29
  380.  
  381. ; typedef unsigned long     createMovieFileFlagsEnum
  382.  
  383. flattenAddMovieToDataFork        EQU        1 << 0
  384. flattenActiveTracksOnly            EQU        1 << 2
  385. flattenDontInterleaveFlatten    EQU        1 << 3
  386. flattenFSSpecPtrIsDataRefRecordPtr EQU        1 << 4
  387.  
  388. ; typedef unsigned long     movieFlattenFlagsEnum
  389.  
  390. movieInDataForkResID            EQU        -1                    ; magic res ID 
  391.  
  392. mcTopLeftMovie                    EQU        1 << 0                ; usually centered 
  393. mcScaleMovieToFit                EQU        1 << 1                ; usually only scales down 
  394. mcWithBadge                        EQU        1 << 2                ; give me a badge 
  395. mcNotVisible                    EQU        1 << 3                ; don't show controller 
  396. mcWithFrame                        EQU        1 << 4                ; gimme a frame 
  397.  
  398. movieScrapDontZeroScrap            EQU        1 << 0
  399. movieScrapOnlyPutMovie            EQU        1 << 1
  400.  
  401. dataRefSelfReference            EQU        1 << 0
  402. dataRefWasNotResolved            EQU        1 << 1
  403.  
  404. ; typedef unsigned long     dataRefAttributesFlags
  405.  
  406. hintsScrubMode                    EQU        1 << 0                ; mask == && (if flags == scrub on, flags != scrub off) 
  407. hintsLoop                        EQU        1 << 1
  408. hintsDontPurge                    EQU        1 << 2
  409. hintsUseScreenBuffer            EQU        1 << 5
  410. hintsAllowInterlace                EQU        1 << 6
  411. hintsUseSoundInterp                EQU        1 << 7
  412. hintsHighQuality                EQU        1 << 8                ; slooooow 
  413. hintsPalindrome                    EQU        1 << 9
  414. hintsInactive                    EQU        1 << 11
  415.  
  416. ; typedef unsigned long     playHintsEnum
  417.  
  418. mediaHandlerFlagBaseClient        EQU        1
  419.  
  420. ; typedef unsigned long     mediaHandlerFlagsEnum
  421.  
  422. movieTrackMediaType                EQU        1 << 0
  423. movieTrackCharacteristic        EQU        1 << 1
  424. movieTrackEnabledOnly            EQU        1 << 2
  425.  
  426. SampleReferenceRecord     RECORD    0
  427. dataOffset                 ds.l    1
  428. dataSize                 ds.l    1
  429. durationPerSample         ds.l    1
  430. numberOfSamples             ds.l    1
  431. sampleFlags                 ds.w    1
  432. sizeof                     EQU    *
  433.                         ENDR
  434.  
  435. ; typedef struct SampleReferenceRecord  SampleReferenceRecord, *SampleReferencePtr
  436. ;************************
  437. ;* Initialization Routines 
  438. ;*************************
  439. ;
  440. ; pascal OSErr EnterMovies(void)
  441. ;
  442.     IF ¬ GENERATINGCFM THEN
  443.         Macro
  444.         _EnterMovies
  445.             moveq    #1,d0
  446.             dc.w     $AAAA
  447.         EndM
  448.     ELSE
  449.         IMPORT    EnterMovies
  450.     ENDIF
  451.  
  452. ;
  453. ; pascal void ExitMovies(void)
  454. ;
  455.     IF ¬ GENERATINGCFM THEN
  456.         Macro
  457.         _ExitMovies
  458.             moveq    #2,d0
  459.             dc.w     $AAAA
  460.         EndM
  461.     ELSE
  462.         IMPORT    ExitMovies
  463.     ENDIF
  464.  
  465. ;************************
  466. ;* Error Routines 
  467. ;*************************
  468. ;
  469. ; pascal OSErr GetMoviesError(void)
  470. ;
  471.     IF ¬ GENERATINGCFM THEN
  472.         Macro
  473.         _GetMoviesError
  474.             moveq    #3,d0
  475.             dc.w     $AAAA
  476.         EndM
  477.     ELSE
  478.         IMPORT    GetMoviesError
  479.     ENDIF
  480.  
  481. ;
  482. ; pascal void ClearMoviesStickyError(void)
  483. ;
  484.     IF ¬ GENERATINGCFM THEN
  485.         Macro
  486.         _ClearMoviesStickyError
  487.             move.w    #$DE,d0
  488.             dc.w     $AAAA
  489.         EndM
  490.     ELSE
  491.         IMPORT    ClearMoviesStickyError
  492.     ENDIF
  493.  
  494. ;
  495. ; pascal OSErr GetMoviesStickyError(void)
  496. ;
  497.     IF ¬ GENERATINGCFM THEN
  498.         Macro
  499.         _GetMoviesStickyError
  500.             moveq    #4,d0
  501.             dc.w     $AAAA
  502.         EndM
  503.     ELSE
  504.         IMPORT    GetMoviesStickyError
  505.     ENDIF
  506.  
  507. ;
  508. ; pascal void SetMoviesErrorProc(MoviesErrorUPP errProc, long refcon)
  509. ;
  510.     IF ¬ GENERATINGCFM THEN
  511.         Macro
  512.         _SetMoviesErrorProc
  513.             move.w    #$EF,d0
  514.             dc.w     $AAAA
  515.         EndM
  516.     ELSE
  517.         IMPORT    SetMoviesErrorProc
  518.     ENDIF
  519.  
  520. ;************************
  521. ;* Idle Routines 
  522. ;*************************
  523. ;
  524. ; pascal void MoviesTask(Movie theMovie, long maxMilliSecToUse)
  525. ;
  526.     IF ¬ GENERATINGCFM THEN
  527.         Macro
  528.         _MoviesTask
  529.             moveq    #5,d0
  530.             dc.w     $AAAA
  531.         EndM
  532.     ELSE
  533.         IMPORT    MoviesTask
  534.     ENDIF
  535.  
  536. ;
  537. ; pascal OSErr PrerollMovie(Movie theMovie, TimeValue time, Fixed Rate)
  538. ;
  539.     IF ¬ GENERATINGCFM THEN
  540.         Macro
  541.         _PrerollMovie
  542.             moveq    #6,d0
  543.             dc.w     $AAAA
  544.         EndM
  545.     ELSE
  546.         IMPORT    PrerollMovie
  547.     ENDIF
  548.  
  549. ;
  550. ; pascal OSErr LoadMovieIntoRam(Movie theMovie, TimeValue time, TimeValue duration, long flags)
  551. ;
  552.     IF ¬ GENERATINGCFM THEN
  553.         Macro
  554.         _LoadMovieIntoRam
  555.             moveq    #7,d0
  556.             dc.w     $AAAA
  557.         EndM
  558.     ELSE
  559.         IMPORT    LoadMovieIntoRam
  560.     ENDIF
  561.  
  562. ;
  563. ; pascal OSErr LoadTrackIntoRam(Track theTrack, TimeValue time, TimeValue duration, long flags)
  564. ;
  565.     IF ¬ GENERATINGCFM THEN
  566.         Macro
  567.         _LoadTrackIntoRam
  568.             move.w    #$16E,d0
  569.             dc.w     $AAAA
  570.         EndM
  571.     ELSE
  572.         IMPORT    LoadTrackIntoRam
  573.     ENDIF
  574.  
  575. ;
  576. ; pascal OSErr LoadMediaIntoRam(Media theMedia, TimeValue time, TimeValue duration, long flags)
  577. ;
  578.     IF ¬ GENERATINGCFM THEN
  579.         Macro
  580.         _LoadMediaIntoRam
  581.             moveq    #8,d0
  582.             dc.w     $AAAA
  583.         EndM
  584.     ELSE
  585.         IMPORT    LoadMediaIntoRam
  586.     ENDIF
  587.  
  588. ;
  589. ; pascal void SetMovieActive(Movie theMovie, Boolean active)
  590. ;
  591.     IF ¬ GENERATINGCFM THEN
  592.         Macro
  593.         _SetMovieActive
  594.             moveq    #9,d0
  595.             dc.w     $AAAA
  596.         EndM
  597.     ELSE
  598.         IMPORT    SetMovieActive
  599.     ENDIF
  600.  
  601. ;
  602. ; pascal Boolean GetMovieActive(Movie theMovie)
  603. ;
  604.     IF ¬ GENERATINGCFM THEN
  605.         Macro
  606.         _GetMovieActive
  607.             moveq    #10,d0
  608.             dc.w     $AAAA
  609.         EndM
  610.     ELSE
  611.         IMPORT    GetMovieActive
  612.     ENDIF
  613.  
  614. ;************************
  615. ;* calls for playing movies, previews, posters
  616. ;*************************
  617. ;
  618. ; pascal void StartMovie(Movie theMovie)
  619. ;
  620.     IF ¬ GENERATINGCFM THEN
  621.         Macro
  622.         _StartMovie
  623.             moveq    #11,d0
  624.             dc.w     $AAAA
  625.         EndM
  626.     ELSE
  627.         IMPORT    StartMovie
  628.     ENDIF
  629.  
  630. ;
  631. ; pascal void StopMovie(Movie theMovie)
  632. ;
  633.     IF ¬ GENERATINGCFM THEN
  634.         Macro
  635.         _StopMovie
  636.             moveq    #12,d0
  637.             dc.w     $AAAA
  638.         EndM
  639.     ELSE
  640.         IMPORT    StopMovie
  641.     ENDIF
  642.  
  643. ;
  644. ; pascal void GoToBeginningOfMovie(Movie theMovie)
  645. ;
  646.     IF ¬ GENERATINGCFM THEN
  647.         Macro
  648.         _GoToBeginningOfMovie
  649.             moveq    #13,d0
  650.             dc.w     $AAAA
  651.         EndM
  652.     ELSE
  653.         IMPORT    GoToBeginningOfMovie
  654.     ENDIF
  655.  
  656. ;
  657. ; pascal void GoToEndOfMovie(Movie theMovie)
  658. ;
  659.     IF ¬ GENERATINGCFM THEN
  660.         Macro
  661.         _GoToEndOfMovie
  662.             moveq    #14,d0
  663.             dc.w     $AAAA
  664.         EndM
  665.     ELSE
  666.         IMPORT    GoToEndOfMovie
  667.     ENDIF
  668.  
  669. ;
  670. ; pascal Boolean IsMovieDone(Movie theMovie)
  671. ;
  672.     IF ¬ GENERATINGCFM THEN
  673.         Macro
  674.         _IsMovieDone
  675.             move.w    #$DD,d0
  676.             dc.w     $AAAA
  677.         EndM
  678.     ELSE
  679.         IMPORT    IsMovieDone
  680.     ENDIF
  681.  
  682. ;
  683. ; pascal Boolean GetMoviePreviewMode(Movie theMovie)
  684. ;
  685.     IF ¬ GENERATINGCFM THEN
  686.         Macro
  687.         _GetMoviePreviewMode
  688.             moveq    #15,d0
  689.             dc.w     $AAAA
  690.         EndM
  691.     ELSE
  692.         IMPORT    GetMoviePreviewMode
  693.     ENDIF
  694.  
  695. ;
  696. ; pascal void SetMoviePreviewMode(Movie theMovie, Boolean usePreview)
  697. ;
  698.     IF ¬ GENERATINGCFM THEN
  699.         Macro
  700.         _SetMoviePreviewMode
  701.             moveq    #16,d0
  702.             dc.w     $AAAA
  703.         EndM
  704.     ELSE
  705.         IMPORT    SetMoviePreviewMode
  706.     ENDIF
  707.  
  708. ;
  709. ; pascal void ShowMoviePoster(Movie theMovie)
  710. ;
  711.     IF ¬ GENERATINGCFM THEN
  712.         Macro
  713.         _ShowMoviePoster
  714.             moveq    #17,d0
  715.             dc.w     $AAAA
  716.         EndM
  717.     ELSE
  718.         IMPORT    ShowMoviePoster
  719.     ENDIF
  720.  
  721. ;
  722. ; pascal void PlayMoviePreview(Movie theMovie, MoviePreviewCallOutUPP callOutProc, long refcon)
  723. ;
  724.     IF ¬ GENERATINGCFM THEN
  725.         Macro
  726.         _PlayMoviePreview
  727.             move.w    #$F2,d0
  728.             dc.w     $AAAA
  729.         EndM
  730.     ELSE
  731.         IMPORT    PlayMoviePreview
  732.     ENDIF
  733.  
  734. ;************************
  735. ;* calls for controlling movies & tracks which are playing
  736. ;*************************
  737. ;
  738. ; pascal TimeBase GetMovieTimeBase(Movie theMovie)
  739. ;
  740.     IF ¬ GENERATINGCFM THEN
  741.         Macro
  742.         _GetMovieTimeBase
  743.             moveq    #18,d0
  744.             dc.w     $AAAA
  745.         EndM
  746.     ELSE
  747.         IMPORT    GetMovieTimeBase
  748.     ENDIF
  749.  
  750. ;
  751. ; pascal void SetMovieMasterTimeBase(Movie theMovie, TimeBase tb, const TimeRecord *slaveZero)
  752. ;
  753.     IF ¬ GENERATINGCFM THEN
  754.         Macro
  755.         _SetMovieMasterTimeBase
  756.             move.w    #$167,d0
  757.             dc.w     $AAAA
  758.         EndM
  759.     ELSE
  760.         IMPORT    SetMovieMasterTimeBase
  761.     ENDIF
  762.  
  763. ;
  764. ; pascal void SetMovieMasterClock(Movie theMovie, Component clockMeister, const TimeRecord *slaveZero)
  765. ;
  766.     IF ¬ GENERATINGCFM THEN
  767.         Macro
  768.         _SetMovieMasterClock
  769.             move.w    #$168,d0
  770.             dc.w     $AAAA
  771.         EndM
  772.     ELSE
  773.         IMPORT    SetMovieMasterClock
  774.     ENDIF
  775.  
  776. ;
  777. ; pascal void GetMovieGWorld(Movie theMovie, CGrafPtr *port, GDHandle *gdh)
  778. ;
  779.     IF ¬ GENERATINGCFM THEN
  780.         Macro
  781.         _GetMovieGWorld
  782.             moveq    #21,d0
  783.             dc.w     $AAAA
  784.         EndM
  785.     ELSE
  786.         IMPORT    GetMovieGWorld
  787.     ENDIF
  788.  
  789. ;
  790. ; pascal void SetMovieGWorld(Movie theMovie, CGrafPtr port, GDHandle gdh)
  791. ;
  792.     IF ¬ GENERATINGCFM THEN
  793.         Macro
  794.         _SetMovieGWorld
  795.             moveq    #22,d0
  796.             dc.w     $AAAA
  797.         EndM
  798.     ELSE
  799.         IMPORT    SetMovieGWorld
  800.     ENDIF
  801.  
  802.  
  803. movieDrawingCallWhenChanged        EQU        0
  804. movieDrawingCallAlways            EQU        1
  805.  
  806. ;
  807. ; pascal void SetMovieDrawingCompleteProc(Movie theMovie, long flags, MovieDrawingCompleteUPP proc, long refCon)
  808. ;
  809.     IF ¬ GENERATINGCFM THEN
  810.         Macro
  811.         _SetMovieDrawingCompleteProc
  812.             move.w    #$1DE,d0
  813.             dc.w     $AAAA
  814.         EndM
  815.     ELSE
  816.         IMPORT    SetMovieDrawingCompleteProc
  817.     ENDIF
  818.  
  819. ;
  820. ; pascal Track GetNextTrackForCompositing(Movie theMovie, Track theTrack)
  821. ;
  822.     IF ¬ GENERATINGCFM THEN
  823.         Macro
  824.         _GetNextTrackForCompositing
  825.             move.w    #$1FA,d0
  826.             dc.w     $AAAA
  827.         EndM
  828.     ELSE
  829.         IMPORT    GetNextTrackForCompositing
  830.     ENDIF
  831.  
  832. ;
  833. ; pascal Track GetPrevTrackForCompositing(Movie theMovie, Track theTrack)
  834. ;
  835.     IF ¬ GENERATINGCFM THEN
  836.         Macro
  837.         _GetPrevTrackForCompositing
  838.             move.w    #$1FB,d0
  839.             dc.w     $AAAA
  840.         EndM
  841.     ELSE
  842.         IMPORT    GetPrevTrackForCompositing
  843.     ENDIF
  844.  
  845. ;
  846. ; pascal void SetTrackGWorld(Track theTrack, CGrafPtr port, GDHandle gdh, TrackTransferUPP proc, long refCon)
  847. ;
  848.     IF ¬ GENERATINGCFM THEN
  849.         Macro
  850.         _SetTrackGWorld
  851.             move.w    #$9D,d0
  852.             dc.w     $AAAA
  853.         EndM
  854.     ELSE
  855.         IMPORT    SetTrackGWorld
  856.     ENDIF
  857.  
  858. ;
  859. ; pascal PicHandle GetMoviePict(Movie theMovie, TimeValue time)
  860. ;
  861.     IF ¬ GENERATINGCFM THEN
  862.         Macro
  863.         _GetMoviePict
  864.             moveq    #29,d0
  865.             dc.w     $AAAA
  866.         EndM
  867.     ELSE
  868.         IMPORT    GetMoviePict
  869.     ENDIF
  870.  
  871. ;
  872. ; pascal PicHandle GetTrackPict(Track theTrack, TimeValue time)
  873. ;
  874.     IF ¬ GENERATINGCFM THEN
  875.         Macro
  876.         _GetTrackPict
  877.             moveq    #30,d0
  878.             dc.w     $AAAA
  879.         EndM
  880.     ELSE
  881.         IMPORT    GetTrackPict
  882.     ENDIF
  883.  
  884. ;
  885. ; pascal PicHandle GetMoviePosterPict(Movie theMovie)
  886. ;
  887.     IF ¬ GENERATINGCFM THEN
  888.         Macro
  889.         _GetMoviePosterPict
  890.             move.w    #$F7,d0
  891.             dc.w     $AAAA
  892.         EndM
  893.     ELSE
  894.         IMPORT    GetMoviePosterPict
  895.     ENDIF
  896.  
  897. ; called between Begin & EndUpdate 
  898. ;
  899. ; pascal OSErr UpdateMovie(Movie theMovie)
  900. ;
  901.     IF ¬ GENERATINGCFM THEN
  902.         Macro
  903.         _UpdateMovie
  904.             moveq    #31,d0
  905.             dc.w     $AAAA
  906.         EndM
  907.     ELSE
  908.         IMPORT    UpdateMovie
  909.     ENDIF
  910.  
  911. ;
  912. ; pascal OSErr InvalidateMovieRegion(Movie theMovie, RgnHandle invalidRgn)
  913. ;
  914.     IF ¬ GENERATINGCFM THEN
  915.         Macro
  916.         _InvalidateMovieRegion
  917.             move.w    #$22A,d0
  918.             dc.w     $AAAA
  919.         EndM
  920.     ELSE
  921.         IMPORT    InvalidateMovieRegion
  922.     ENDIF
  923.  
  924. ;*** spatial movie routines ***
  925. ;
  926. ; pascal void GetMovieBox(Movie theMovie, Rect *boxRect)
  927. ;
  928.     IF ¬ GENERATINGCFM THEN
  929.         Macro
  930.         _GetMovieBox
  931.             move.w    #$F9,d0
  932.             dc.w     $AAAA
  933.         EndM
  934.     ELSE
  935.         IMPORT    GetMovieBox
  936.     ENDIF
  937.  
  938. ;
  939. ; pascal void SetMovieBox(Movie theMovie, const Rect *boxRect)
  940. ;
  941.     IF ¬ GENERATINGCFM THEN
  942.         Macro
  943.         _SetMovieBox
  944.             move.w    #$FA,d0
  945.             dc.w     $AAAA
  946.         EndM
  947.     ELSE
  948.         IMPORT    SetMovieBox
  949.     ENDIF
  950.  
  951. ;* movie display clip 
  952. ;
  953. ; pascal RgnHandle GetMovieDisplayClipRgn(Movie theMovie)
  954. ;
  955.     IF ¬ GENERATINGCFM THEN
  956.         Macro
  957.         _GetMovieDisplayClipRgn
  958.             move.w    #$FC,d0
  959.             dc.w     $AAAA
  960.         EndM
  961.     ELSE
  962.         IMPORT    GetMovieDisplayClipRgn
  963.     ENDIF
  964.  
  965. ;
  966. ; pascal void SetMovieDisplayClipRgn(Movie theMovie, RgnHandle theClip)
  967. ;
  968.     IF ¬ GENERATINGCFM THEN
  969.         Macro
  970.         _SetMovieDisplayClipRgn
  971.             move.w    #$FD,d0
  972.             dc.w     $AAAA
  973.         EndM
  974.     ELSE
  975.         IMPORT    SetMovieDisplayClipRgn
  976.     ENDIF
  977.  
  978. ;* movie src clip 
  979. ;
  980. ; pascal RgnHandle GetMovieClipRgn(Movie theMovie)
  981. ;
  982.     IF ¬ GENERATINGCFM THEN
  983.         Macro
  984.         _GetMovieClipRgn
  985.             move.w    #$100,d0
  986.             dc.w     $AAAA
  987.         EndM
  988.     ELSE
  989.         IMPORT    GetMovieClipRgn
  990.     ENDIF
  991.  
  992. ;
  993. ; pascal void SetMovieClipRgn(Movie theMovie, RgnHandle theClip)
  994. ;
  995.     IF ¬ GENERATINGCFM THEN
  996.         Macro
  997.         _SetMovieClipRgn
  998.             move.w    #$101,d0
  999.             dc.w     $AAAA
  1000.         EndM
  1001.     ELSE
  1002.         IMPORT    SetMovieClipRgn
  1003.     ENDIF
  1004.  
  1005. ;* track src clip 
  1006. ;
  1007. ; pascal RgnHandle GetTrackClipRgn(Track theTrack)
  1008. ;
  1009.     IF ¬ GENERATINGCFM THEN
  1010.         Macro
  1011.         _GetTrackClipRgn
  1012.             move.w    #$102,d0
  1013.             dc.w     $AAAA
  1014.         EndM
  1015.     ELSE
  1016.         IMPORT    GetTrackClipRgn
  1017.     ENDIF
  1018.  
  1019. ;
  1020. ; pascal void SetTrackClipRgn(Track theTrack, RgnHandle theClip)
  1021. ;
  1022.     IF ¬ GENERATINGCFM THEN
  1023.         Macro
  1024.         _SetTrackClipRgn
  1025.             move.w    #$103,d0
  1026.             dc.w     $AAAA
  1027.         EndM
  1028.     ELSE
  1029.         IMPORT    SetTrackClipRgn
  1030.     ENDIF
  1031.  
  1032. ;* bounds in display space (not clipped by display clip) 
  1033. ;
  1034. ; pascal RgnHandle GetMovieDisplayBoundsRgn(Movie theMovie)
  1035. ;
  1036.     IF ¬ GENERATINGCFM THEN
  1037.         Macro
  1038.         _GetMovieDisplayBoundsRgn
  1039.             move.w    #$FB,d0
  1040.             dc.w     $AAAA
  1041.         EndM
  1042.     ELSE
  1043.         IMPORT    GetMovieDisplayBoundsRgn
  1044.     ENDIF
  1045.  
  1046. ;
  1047. ; pascal RgnHandle GetTrackDisplayBoundsRgn(Track theTrack)
  1048. ;
  1049.     IF ¬ GENERATINGCFM THEN
  1050.         Macro
  1051.         _GetTrackDisplayBoundsRgn
  1052.             move.w    #$112,d0
  1053.             dc.w     $AAAA
  1054.         EndM
  1055.     ELSE
  1056.         IMPORT    GetTrackDisplayBoundsRgn
  1057.     ENDIF
  1058.  
  1059. ;* bounds in movie space 
  1060. ;
  1061. ; pascal RgnHandle GetMovieBoundsRgn(Movie theMovie)
  1062. ;
  1063.     IF ¬ GENERATINGCFM THEN
  1064.         Macro
  1065.         _GetMovieBoundsRgn
  1066.             move.w    #$FE,d0
  1067.             dc.w     $AAAA
  1068.         EndM
  1069.     ELSE
  1070.         IMPORT    GetMovieBoundsRgn
  1071.     ENDIF
  1072.  
  1073. ;
  1074. ; pascal RgnHandle GetTrackMovieBoundsRgn(Track theTrack)
  1075. ;
  1076.     IF ¬ GENERATINGCFM THEN
  1077.         Macro
  1078.         _GetTrackMovieBoundsRgn
  1079.             move.w    #$FF,d0
  1080.             dc.w     $AAAA
  1081.         EndM
  1082.     ELSE
  1083.         IMPORT    GetTrackMovieBoundsRgn
  1084.     ENDIF
  1085.  
  1086. ;* bounds in track space 
  1087. ;
  1088. ; pascal RgnHandle GetTrackBoundsRgn(Track theTrack)
  1089. ;
  1090.     IF ¬ GENERATINGCFM THEN
  1091.         Macro
  1092.         _GetTrackBoundsRgn
  1093.             move.w    #$111,d0
  1094.             dc.w     $AAAA
  1095.         EndM
  1096.     ELSE
  1097.         IMPORT    GetTrackBoundsRgn
  1098.     ENDIF
  1099.  
  1100. ;* mattes - always in track space 
  1101. ;
  1102. ; pascal PixMapHandle GetTrackMatte(Track theTrack)
  1103. ;
  1104.     IF ¬ GENERATINGCFM THEN
  1105.         Macro
  1106.         _GetTrackMatte
  1107.             move.w    #$115,d0
  1108.             dc.w     $AAAA
  1109.         EndM
  1110.     ELSE
  1111.         IMPORT    GetTrackMatte
  1112.     ENDIF
  1113.  
  1114. ;
  1115. ; pascal void SetTrackMatte(Track theTrack, PixMapHandle theMatte)
  1116. ;
  1117.     IF ¬ GENERATINGCFM THEN
  1118.         Macro
  1119.         _SetTrackMatte
  1120.             move.w    #$116,d0
  1121.             dc.w     $AAAA
  1122.         EndM
  1123.     ELSE
  1124.         IMPORT    SetTrackMatte
  1125.     ENDIF
  1126.  
  1127. ;
  1128. ; pascal void DisposeMatte(PixMapHandle theMatte)
  1129. ;
  1130.     IF ¬ GENERATINGCFM THEN
  1131.         Macro
  1132.         _DisposeMatte
  1133.             move.w    #$14A,d0
  1134.             dc.w     $AAAA
  1135.         EndM
  1136.     ELSE
  1137.         IMPORT    DisposeMatte
  1138.     ENDIF
  1139.  
  1140. ;************************
  1141. ;* calls for getting/saving movies
  1142. ;*************************
  1143. ;
  1144. ; pascal Movie NewMovie(long flags)
  1145. ;
  1146.     IF ¬ GENERATINGCFM THEN
  1147.         Macro
  1148.         _NewMovie
  1149.             move.w    #$187,d0
  1150.             dc.w     $AAAA
  1151.         EndM
  1152.     ELSE
  1153.         IMPORT    NewMovie
  1154.     ENDIF
  1155.  
  1156. ;
  1157. ; pascal OSErr PutMovieIntoHandle(Movie theMovie, Handle publicMovie)
  1158. ;
  1159.     IF ¬ GENERATINGCFM THEN
  1160.         Macro
  1161.         _PutMovieIntoHandle
  1162.             moveq    #34,d0
  1163.             dc.w     $AAAA
  1164.         EndM
  1165.     ELSE
  1166.         IMPORT    PutMovieIntoHandle
  1167.     ENDIF
  1168.  
  1169. ;
  1170. ; pascal OSErr PutMovieIntoDataFork(Movie theMovie, short fRefNum, long offset, long maxSize)
  1171. ;
  1172.     IF ¬ GENERATINGCFM THEN
  1173.         Macro
  1174.         _PutMovieIntoDataFork
  1175.             move.w    #$1B4,d0
  1176.             dc.w     $AAAA
  1177.         EndM
  1178.     ELSE
  1179.         IMPORT    PutMovieIntoDataFork
  1180.     ENDIF
  1181.  
  1182. ;
  1183. ; pascal void DisposeMovie(Movie theMovie)
  1184. ;
  1185.     IF ¬ GENERATINGCFM THEN
  1186.         Macro
  1187.         _DisposeMovie
  1188.             moveq    #35,d0
  1189.             dc.w     $AAAA
  1190.         EndM
  1191.     ELSE
  1192.         IMPORT    DisposeMovie
  1193.     ENDIF
  1194.  
  1195. ;************************
  1196. ;* Movie State Routines
  1197. ;*************************
  1198. ;
  1199. ; pascal unsigned long GetMovieCreationTime(Movie theMovie)
  1200. ;
  1201.     IF ¬ GENERATINGCFM THEN
  1202.         Macro
  1203.         _GetMovieCreationTime
  1204.             moveq    #38,d0
  1205.             dc.w     $AAAA
  1206.         EndM
  1207.     ELSE
  1208.         IMPORT    GetMovieCreationTime
  1209.     ENDIF
  1210.  
  1211. ;
  1212. ; pascal unsigned long GetMovieModificationTime(Movie theMovie)
  1213. ;
  1214.     IF ¬ GENERATINGCFM THEN
  1215.         Macro
  1216.         _GetMovieModificationTime
  1217.             moveq    #39,d0
  1218.             dc.w     $AAAA
  1219.         EndM
  1220.     ELSE
  1221.         IMPORT    GetMovieModificationTime
  1222.     ENDIF
  1223.  
  1224. ;
  1225. ; pascal TimeScale GetMovieTimeScale(Movie theMovie)
  1226. ;
  1227.     IF ¬ GENERATINGCFM THEN
  1228.         Macro
  1229.         _GetMovieTimeScale
  1230.             moveq    #41,d0
  1231.             dc.w     $AAAA
  1232.         EndM
  1233.     ELSE
  1234.         IMPORT    GetMovieTimeScale
  1235.     ENDIF
  1236.  
  1237. ;
  1238. ; pascal void SetMovieTimeScale(Movie theMovie, TimeScale timeScale)
  1239. ;
  1240.     IF ¬ GENERATINGCFM THEN
  1241.         Macro
  1242.         _SetMovieTimeScale
  1243.             moveq    #42,d0
  1244.             dc.w     $AAAA
  1245.         EndM
  1246.     ELSE
  1247.         IMPORT    SetMovieTimeScale
  1248.     ENDIF
  1249.  
  1250. ;
  1251. ; pascal TimeValue GetMovieDuration(Movie theMovie)
  1252. ;
  1253.     IF ¬ GENERATINGCFM THEN
  1254.         Macro
  1255.         _GetMovieDuration
  1256.             moveq    #43,d0
  1257.             dc.w     $AAAA
  1258.         EndM
  1259.     ELSE
  1260.         IMPORT    GetMovieDuration
  1261.     ENDIF
  1262.  
  1263. ;
  1264. ; pascal Fixed GetMovieRate(Movie theMovie)
  1265. ;
  1266.     IF ¬ GENERATINGCFM THEN
  1267.         Macro
  1268.         _GetMovieRate
  1269.             moveq    #44,d0
  1270.             dc.w     $AAAA
  1271.         EndM
  1272.     ELSE
  1273.         IMPORT    GetMovieRate
  1274.     ENDIF
  1275.  
  1276. ;
  1277. ; pascal void SetMovieRate(Movie theMovie, Fixed rate)
  1278. ;
  1279.     IF ¬ GENERATINGCFM THEN
  1280.         Macro
  1281.         _SetMovieRate
  1282.             moveq    #45,d0
  1283.             dc.w     $AAAA
  1284.         EndM
  1285.     ELSE
  1286.         IMPORT    SetMovieRate
  1287.     ENDIF
  1288.  
  1289. ;
  1290. ; pascal Fixed GetMoviePreferredRate(Movie theMovie)
  1291. ;
  1292.     IF ¬ GENERATINGCFM THEN
  1293.         Macro
  1294.         _GetMoviePreferredRate
  1295.             move.w    #$F3,d0
  1296.             dc.w     $AAAA
  1297.         EndM
  1298.     ELSE
  1299.         IMPORT    GetMoviePreferredRate
  1300.     ENDIF
  1301.  
  1302. ;
  1303. ; pascal void SetMoviePreferredRate(Movie theMovie, Fixed rate)
  1304. ;
  1305.     IF ¬ GENERATINGCFM THEN
  1306.         Macro
  1307.         _SetMoviePreferredRate
  1308.             move.w    #$F4,d0
  1309.             dc.w     $AAAA
  1310.         EndM
  1311.     ELSE
  1312.         IMPORT    SetMoviePreferredRate
  1313.     ENDIF
  1314.  
  1315. ;
  1316. ; pascal short GetMoviePreferredVolume(Movie theMovie)
  1317. ;
  1318.     IF ¬ GENERATINGCFM THEN
  1319.         Macro
  1320.         _GetMoviePreferredVolume
  1321.             move.w    #$F5,d0
  1322.             dc.w     $AAAA
  1323.         EndM
  1324.     ELSE
  1325.         IMPORT    GetMoviePreferredVolume
  1326.     ENDIF
  1327.  
  1328. ;
  1329. ; pascal void SetMoviePreferredVolume(Movie theMovie, short volume)
  1330. ;
  1331.     IF ¬ GENERATINGCFM THEN
  1332.         Macro
  1333.         _SetMoviePreferredVolume
  1334.             move.w    #$F6,d0
  1335.             dc.w     $AAAA
  1336.         EndM
  1337.     ELSE
  1338.         IMPORT    SetMoviePreferredVolume
  1339.     ENDIF
  1340.  
  1341. ;
  1342. ; pascal short GetMovieVolume(Movie theMovie)
  1343. ;
  1344.     IF ¬ GENERATINGCFM THEN
  1345.         Macro
  1346.         _GetMovieVolume
  1347.             moveq    #46,d0
  1348.             dc.w     $AAAA
  1349.         EndM
  1350.     ELSE
  1351.         IMPORT    GetMovieVolume
  1352.     ENDIF
  1353.  
  1354. ;
  1355. ; pascal void SetMovieVolume(Movie theMovie, short volume)
  1356. ;
  1357.     IF ¬ GENERATINGCFM THEN
  1358.         Macro
  1359.         _SetMovieVolume
  1360.             moveq    #47,d0
  1361.             dc.w     $AAAA
  1362.         EndM
  1363.     ELSE
  1364.         IMPORT    SetMovieVolume
  1365.     ENDIF
  1366.  
  1367. ;
  1368. ; pascal void GetMovieMatrix(Movie theMovie, MatrixRecord *matrix)
  1369. ;
  1370.     IF ¬ GENERATINGCFM THEN
  1371.         Macro
  1372.         _GetMovieMatrix
  1373.             moveq    #49,d0
  1374.             dc.w     $AAAA
  1375.         EndM
  1376.     ELSE
  1377.         IMPORT    GetMovieMatrix
  1378.     ENDIF
  1379.  
  1380. ;
  1381. ; pascal void SetMovieMatrix(Movie theMovie, const MatrixRecord *matrix)
  1382. ;
  1383.     IF ¬ GENERATINGCFM THEN
  1384.         Macro
  1385.         _SetMovieMatrix
  1386.             moveq    #50,d0
  1387.             dc.w     $AAAA
  1388.         EndM
  1389.     ELSE
  1390.         IMPORT    SetMovieMatrix
  1391.     ENDIF
  1392.  
  1393. ;
  1394. ; pascal void GetMoviePreviewTime(Movie theMovie, TimeValue *previewTime, TimeValue *previewDuration)
  1395. ;
  1396.     IF ¬ GENERATINGCFM THEN
  1397.         Macro
  1398.         _GetMoviePreviewTime
  1399.             moveq    #51,d0
  1400.             dc.w     $AAAA
  1401.         EndM
  1402.     ELSE
  1403.         IMPORT    GetMoviePreviewTime
  1404.     ENDIF
  1405.  
  1406. ;
  1407. ; pascal void SetMoviePreviewTime(Movie theMovie, TimeValue previewTime, TimeValue previewDuration)
  1408. ;
  1409.     IF ¬ GENERATINGCFM THEN
  1410.         Macro
  1411.         _SetMoviePreviewTime
  1412.             moveq    #52,d0
  1413.             dc.w     $AAAA
  1414.         EndM
  1415.     ELSE
  1416.         IMPORT    SetMoviePreviewTime
  1417.     ENDIF
  1418.  
  1419. ;
  1420. ; pascal TimeValue GetMoviePosterTime(Movie theMovie)
  1421. ;
  1422.     IF ¬ GENERATINGCFM THEN
  1423.         Macro
  1424.         _GetMoviePosterTime
  1425.             moveq    #53,d0
  1426.             dc.w     $AAAA
  1427.         EndM
  1428.     ELSE
  1429.         IMPORT    GetMoviePosterTime
  1430.     ENDIF
  1431.  
  1432. ;
  1433. ; pascal void SetMoviePosterTime(Movie theMovie, TimeValue posterTime)
  1434. ;
  1435.     IF ¬ GENERATINGCFM THEN
  1436.         Macro
  1437.         _SetMoviePosterTime
  1438.             moveq    #54,d0
  1439.             dc.w     $AAAA
  1440.         EndM
  1441.     ELSE
  1442.         IMPORT    SetMoviePosterTime
  1443.     ENDIF
  1444.  
  1445. ;
  1446. ; pascal void GetMovieSelection(Movie theMovie, TimeValue *selectionTime, TimeValue *selectionDuration)
  1447. ;
  1448.     IF ¬ GENERATINGCFM THEN
  1449.         Macro
  1450.         _GetMovieSelection
  1451.             moveq    #55,d0
  1452.             dc.w     $AAAA
  1453.         EndM
  1454.     ELSE
  1455.         IMPORT    GetMovieSelection
  1456.     ENDIF
  1457.  
  1458. ;
  1459. ; pascal void SetMovieSelection(Movie theMovie, TimeValue selectionTime, TimeValue selectionDuration)
  1460. ;
  1461.     IF ¬ GENERATINGCFM THEN
  1462.         Macro
  1463.         _SetMovieSelection
  1464.             moveq    #56,d0
  1465.             dc.w     $AAAA
  1466.         EndM
  1467.     ELSE
  1468.         IMPORT    SetMovieSelection
  1469.     ENDIF
  1470.  
  1471. ;
  1472. ; pascal void SetMovieActiveSegment(Movie theMovie, TimeValue startTime, TimeValue duration)
  1473. ;
  1474.     IF ¬ GENERATINGCFM THEN
  1475.         Macro
  1476.         _SetMovieActiveSegment
  1477.             move.w    #$15C,d0
  1478.             dc.w     $AAAA
  1479.         EndM
  1480.     ELSE
  1481.         IMPORT    SetMovieActiveSegment
  1482.     ENDIF
  1483.  
  1484. ;
  1485. ; pascal void GetMovieActiveSegment(Movie theMovie, TimeValue *startTime, TimeValue *duration)
  1486. ;
  1487.     IF ¬ GENERATINGCFM THEN
  1488.         Macro
  1489.         _GetMovieActiveSegment
  1490.             move.w    #$15D,d0
  1491.             dc.w     $AAAA
  1492.         EndM
  1493.     ELSE
  1494.         IMPORT    GetMovieActiveSegment
  1495.     ENDIF
  1496.  
  1497. ;
  1498. ; pascal TimeValue GetMovieTime(Movie theMovie, TimeRecord *currentTime)
  1499. ;
  1500.     IF ¬ GENERATINGCFM THEN
  1501.         Macro
  1502.         _GetMovieTime
  1503.             moveq    #57,d0
  1504.             dc.w     $AAAA
  1505.         EndM
  1506.     ELSE
  1507.         IMPORT    GetMovieTime
  1508.     ENDIF
  1509.  
  1510. ;
  1511. ; pascal void SetMovieTime(Movie theMovie, const TimeRecord *newtime)
  1512. ;
  1513.     IF ¬ GENERATINGCFM THEN
  1514.         Macro
  1515.         _SetMovieTime
  1516.             moveq    #60,d0
  1517.             dc.w     $AAAA
  1518.         EndM
  1519.     ELSE
  1520.         IMPORT    SetMovieTime
  1521.     ENDIF
  1522.  
  1523. ;
  1524. ; pascal void SetMovieTimeValue(Movie theMovie, TimeValue newtime)
  1525. ;
  1526.     IF ¬ GENERATINGCFM THEN
  1527.         Macro
  1528.         _SetMovieTimeValue
  1529.             moveq    #61,d0
  1530.             dc.w     $AAAA
  1531.         EndM
  1532.     ELSE
  1533.         IMPORT    SetMovieTimeValue
  1534.     ENDIF
  1535.  
  1536. ;
  1537. ; pascal UserData GetMovieUserData(Movie theMovie)
  1538. ;
  1539.     IF ¬ GENERATINGCFM THEN
  1540.         Macro
  1541.         _GetMovieUserData
  1542.             moveq    #62,d0
  1543.             dc.w     $AAAA
  1544.         EndM
  1545.     ELSE
  1546.         IMPORT    GetMovieUserData
  1547.     ENDIF
  1548.  
  1549. ;************************
  1550. ;* Track/Media finding routines
  1551. ;*************************
  1552. ;
  1553. ; pascal long GetMovieTrackCount(Movie theMovie)
  1554. ;
  1555.     IF ¬ GENERATINGCFM THEN
  1556.         Macro
  1557.         _GetMovieTrackCount
  1558.             moveq    #63,d0
  1559.             dc.w     $AAAA
  1560.         EndM
  1561.     ELSE
  1562.         IMPORT    GetMovieTrackCount
  1563.     ENDIF
  1564.  
  1565. ;
  1566. ; pascal Track GetMovieTrack(Movie theMovie, long trackID)
  1567. ;
  1568.     IF ¬ GENERATINGCFM THEN
  1569.         Macro
  1570.         _GetMovieTrack
  1571.             moveq    #64,d0
  1572.             dc.w     $AAAA
  1573.         EndM
  1574.     ELSE
  1575.         IMPORT    GetMovieTrack
  1576.     ENDIF
  1577.  
  1578. ;
  1579. ; pascal Track GetMovieIndTrack(Movie theMovie, long index)
  1580. ;
  1581.     IF ¬ GENERATINGCFM THEN
  1582.         Macro
  1583.         _GetMovieIndTrack
  1584.             move.w    #$117,d0
  1585.             dc.w     $AAAA
  1586.         EndM
  1587.     ELSE
  1588.         IMPORT    GetMovieIndTrack
  1589.     ENDIF
  1590.  
  1591. ;
  1592. ; pascal Track GetMovieIndTrackType(Movie theMovie, long index, OSType trackType, long flags)
  1593. ;
  1594.     IF ¬ GENERATINGCFM THEN
  1595.         Macro
  1596.         _GetMovieIndTrackType
  1597.             move.w    #$208,d0
  1598.             dc.w     $AAAA
  1599.         EndM
  1600.     ELSE
  1601.         IMPORT    GetMovieIndTrackType
  1602.     ENDIF
  1603.  
  1604. ;
  1605. ; pascal long GetTrackID(Track theTrack)
  1606. ;
  1607.     IF ¬ GENERATINGCFM THEN
  1608.         Macro
  1609.         _GetTrackID
  1610.             move.w    #$127,d0
  1611.             dc.w     $AAAA
  1612.         EndM
  1613.     ELSE
  1614.         IMPORT    GetTrackID
  1615.     ENDIF
  1616.  
  1617. ;
  1618. ; pascal Movie GetTrackMovie(Track theTrack)
  1619. ;
  1620.     IF ¬ GENERATINGCFM THEN
  1621.         Macro
  1622.         _GetTrackMovie
  1623.             move.w    #$D0,d0
  1624.             dc.w     $AAAA
  1625.         EndM
  1626.     ELSE
  1627.         IMPORT    GetTrackMovie
  1628.     ENDIF
  1629.  
  1630. ;************************
  1631. ;* Track creation routines
  1632. ;*************************
  1633. ;
  1634. ; pascal Track NewMovieTrack(Movie theMovie, Fixed width, Fixed height, short trackVolume)
  1635. ;
  1636.     IF ¬ GENERATINGCFM THEN
  1637.         Macro
  1638.         _NewMovieTrack
  1639.             move.w    #$188,d0
  1640.             dc.w     $AAAA
  1641.         EndM
  1642.     ELSE
  1643.         IMPORT    NewMovieTrack
  1644.     ENDIF
  1645.  
  1646. ;
  1647. ; pascal void DisposeMovieTrack(Track theTrack)
  1648. ;
  1649.     IF ¬ GENERATINGCFM THEN
  1650.         Macro
  1651.         _DisposeMovieTrack
  1652.             moveq    #66,d0
  1653.             dc.w     $AAAA
  1654.         EndM
  1655.     ELSE
  1656.         IMPORT    DisposeMovieTrack
  1657.     ENDIF
  1658.  
  1659. ;************************
  1660. ;* Track State routines
  1661. ;*************************
  1662. ;
  1663. ; pascal unsigned long GetTrackCreationTime(Track theTrack)
  1664. ;
  1665.     IF ¬ GENERATINGCFM THEN
  1666.         Macro
  1667.         _GetTrackCreationTime
  1668.             moveq    #67,d0
  1669.             dc.w     $AAAA
  1670.         EndM
  1671.     ELSE
  1672.         IMPORT    GetTrackCreationTime
  1673.     ENDIF
  1674.  
  1675. ;
  1676. ; pascal unsigned long GetTrackModificationTime(Track theTrack)
  1677. ;
  1678.     IF ¬ GENERATINGCFM THEN
  1679.         Macro
  1680.         _GetTrackModificationTime
  1681.             moveq    #68,d0
  1682.             dc.w     $AAAA
  1683.         EndM
  1684.     ELSE
  1685.         IMPORT    GetTrackModificationTime
  1686.     ENDIF
  1687.  
  1688. ;
  1689. ; pascal Boolean GetTrackEnabled(Track theTrack)
  1690. ;
  1691.     IF ¬ GENERATINGCFM THEN
  1692.         Macro
  1693.         _GetTrackEnabled
  1694.             moveq    #69,d0
  1695.             dc.w     $AAAA
  1696.         EndM
  1697.     ELSE
  1698.         IMPORT    GetTrackEnabled
  1699.     ENDIF
  1700.  
  1701. ;
  1702. ; pascal void SetTrackEnabled(Track theTrack, Boolean isEnabled)
  1703. ;
  1704.     IF ¬ GENERATINGCFM THEN
  1705.         Macro
  1706.         _SetTrackEnabled
  1707.             moveq    #70,d0
  1708.             dc.w     $AAAA
  1709.         EndM
  1710.     ELSE
  1711.         IMPORT    SetTrackEnabled
  1712.     ENDIF
  1713.  
  1714. ;
  1715. ; pascal long GetTrackUsage(Track theTrack)
  1716. ;
  1717.     IF ¬ GENERATINGCFM THEN
  1718.         Macro
  1719.         _GetTrackUsage
  1720.             moveq    #71,d0
  1721.             dc.w     $AAAA
  1722.         EndM
  1723.     ELSE
  1724.         IMPORT    GetTrackUsage
  1725.     ENDIF
  1726.  
  1727. ;
  1728. ; pascal void SetTrackUsage(Track theTrack, long usage)
  1729. ;
  1730.     IF ¬ GENERATINGCFM THEN
  1731.         Macro
  1732.         _SetTrackUsage
  1733.             moveq    #72,d0
  1734.             dc.w     $AAAA
  1735.         EndM
  1736.     ELSE
  1737.         IMPORT    SetTrackUsage
  1738.     ENDIF
  1739.  
  1740. ;
  1741. ; pascal TimeValue GetTrackDuration(Track theTrack)
  1742. ;
  1743.     IF ¬ GENERATINGCFM THEN
  1744.         Macro
  1745.         _GetTrackDuration
  1746.             moveq    #75,d0
  1747.             dc.w     $AAAA
  1748.         EndM
  1749.     ELSE
  1750.         IMPORT    GetTrackDuration
  1751.     ENDIF
  1752.  
  1753. ;
  1754. ; pascal TimeValue GetTrackOffset(Track theTrack)
  1755. ;
  1756.     IF ¬ GENERATINGCFM THEN
  1757.         Macro
  1758.         _GetTrackOffset
  1759.             moveq    #76,d0
  1760.             dc.w     $AAAA
  1761.         EndM
  1762.     ELSE
  1763.         IMPORT    GetTrackOffset
  1764.     ENDIF
  1765.  
  1766. ;
  1767. ; pascal void SetTrackOffset(Track theTrack, TimeValue movieOffsetTime)
  1768. ;
  1769.     IF ¬ GENERATINGCFM THEN
  1770.         Macro
  1771.         _SetTrackOffset
  1772.             moveq    #77,d0
  1773.             dc.w     $AAAA
  1774.         EndM
  1775.     ELSE
  1776.         IMPORT    SetTrackOffset
  1777.     ENDIF
  1778.  
  1779. ;
  1780. ; pascal short GetTrackLayer(Track theTrack)
  1781. ;
  1782.     IF ¬ GENERATINGCFM THEN
  1783.         Macro
  1784.         _GetTrackLayer
  1785.             moveq    #80,d0
  1786.             dc.w     $AAAA
  1787.         EndM
  1788.     ELSE
  1789.         IMPORT    GetTrackLayer
  1790.     ENDIF
  1791.  
  1792. ;
  1793. ; pascal void SetTrackLayer(Track theTrack, short layer)
  1794. ;
  1795.     IF ¬ GENERATINGCFM THEN
  1796.         Macro
  1797.         _SetTrackLayer
  1798.             moveq    #81,d0
  1799.             dc.w     $AAAA
  1800.         EndM
  1801.     ELSE
  1802.         IMPORT    SetTrackLayer
  1803.     ENDIF
  1804.  
  1805. ;
  1806. ; pascal Track GetTrackAlternate(Track theTrack)
  1807. ;
  1808.     IF ¬ GENERATINGCFM THEN
  1809.         Macro
  1810.         _GetTrackAlternate
  1811.             moveq    #82,d0
  1812.             dc.w     $AAAA
  1813.         EndM
  1814.     ELSE
  1815.         IMPORT    GetTrackAlternate
  1816.     ENDIF
  1817.  
  1818. ;
  1819. ; pascal void SetTrackAlternate(Track theTrack, Track alternateT)
  1820. ;
  1821.     IF ¬ GENERATINGCFM THEN
  1822.         Macro
  1823.         _SetTrackAlternate
  1824.             moveq    #83,d0
  1825.             dc.w     $AAAA
  1826.         EndM
  1827.     ELSE
  1828.         IMPORT    SetTrackAlternate
  1829.     ENDIF
  1830.  
  1831. ;
  1832. ; pascal void SetAutoTrackAlternatesEnabled(Movie theMovie, Boolean enable)
  1833. ;
  1834.     IF ¬ GENERATINGCFM THEN
  1835.         Macro
  1836.         _SetAutoTrackAlternatesEnabled
  1837.             move.w    #$15E,d0
  1838.             dc.w     $AAAA
  1839.         EndM
  1840.     ELSE
  1841.         IMPORT    SetAutoTrackAlternatesEnabled
  1842.     ENDIF
  1843.  
  1844. ;
  1845. ; pascal void SelectMovieAlternates(Movie theMovie)
  1846. ;
  1847.     IF ¬ GENERATINGCFM THEN
  1848.         Macro
  1849.         _SelectMovieAlternates
  1850.             move.w    #$15F,d0
  1851.             dc.w     $AAAA
  1852.         EndM
  1853.     ELSE
  1854.         IMPORT    SelectMovieAlternates
  1855.     ENDIF
  1856.  
  1857. ;
  1858. ; pascal short GetTrackVolume(Track theTrack)
  1859. ;
  1860.     IF ¬ GENERATINGCFM THEN
  1861.         Macro
  1862.         _GetTrackVolume
  1863.             moveq    #84,d0
  1864.             dc.w     $AAAA
  1865.         EndM
  1866.     ELSE
  1867.         IMPORT    GetTrackVolume
  1868.     ENDIF
  1869.  
  1870. ;
  1871. ; pascal void SetTrackVolume(Track theTrack, short volume)
  1872. ;
  1873.     IF ¬ GENERATINGCFM THEN
  1874.         Macro
  1875.         _SetTrackVolume
  1876.             moveq    #85,d0
  1877.             dc.w     $AAAA
  1878.         EndM
  1879.     ELSE
  1880.         IMPORT    SetTrackVolume
  1881.     ENDIF
  1882.  
  1883. ;
  1884. ; pascal void GetTrackMatrix(Track theTrack, MatrixRecord *matrix)
  1885. ;
  1886.     IF ¬ GENERATINGCFM THEN
  1887.         Macro
  1888.         _GetTrackMatrix
  1889.             moveq    #86,d0
  1890.             dc.w     $AAAA
  1891.         EndM
  1892.     ELSE
  1893.         IMPORT    GetTrackMatrix
  1894.     ENDIF
  1895.  
  1896. ;
  1897. ; pascal void SetTrackMatrix(Track theTrack, const MatrixRecord *matrix)
  1898. ;
  1899.     IF ¬ GENERATINGCFM THEN
  1900.         Macro
  1901.         _SetTrackMatrix
  1902.             moveq    #87,d0
  1903.             dc.w     $AAAA
  1904.         EndM
  1905.     ELSE
  1906.         IMPORT    SetTrackMatrix
  1907.     ENDIF
  1908.  
  1909. ;
  1910. ; pascal void GetTrackDimensions(Track theTrack, Fixed *width, Fixed *height)
  1911. ;
  1912.     IF ¬ GENERATINGCFM THEN
  1913.         Macro
  1914.         _GetTrackDimensions
  1915.             moveq    #93,d0
  1916.             dc.w     $AAAA
  1917.         EndM
  1918.     ELSE
  1919.         IMPORT    GetTrackDimensions
  1920.     ENDIF
  1921.  
  1922. ;
  1923. ; pascal void SetTrackDimensions(Track theTrack, Fixed width, Fixed height)
  1924. ;
  1925.     IF ¬ GENERATINGCFM THEN
  1926.         Macro
  1927.         _SetTrackDimensions
  1928.             moveq    #94,d0
  1929.             dc.w     $AAAA
  1930.         EndM
  1931.     ELSE
  1932.         IMPORT    SetTrackDimensions
  1933.     ENDIF
  1934.  
  1935. ;
  1936. ; pascal UserData GetTrackUserData(Track theTrack)
  1937. ;
  1938.     IF ¬ GENERATINGCFM THEN
  1939.         Macro
  1940.         _GetTrackUserData
  1941.             moveq    #95,d0
  1942.             dc.w     $AAAA
  1943.         EndM
  1944.     ELSE
  1945.         IMPORT    GetTrackUserData
  1946.     ENDIF
  1947.  
  1948. ;************************
  1949. ;* get Media routines
  1950. ;*************************
  1951. ;
  1952. ; pascal Media NewTrackMedia(Track theTrack, OSType mediaType, TimeScale timeScale, Handle dataRef, OSType dataRefType)
  1953. ;
  1954.     IF ¬ GENERATINGCFM THEN
  1955.         Macro
  1956.         _NewTrackMedia
  1957.             move.w    #$18E,d0
  1958.             dc.w     $AAAA
  1959.         EndM
  1960.     ELSE
  1961.         IMPORT    NewTrackMedia
  1962.     ENDIF
  1963.  
  1964. ;
  1965. ; pascal void DisposeTrackMedia(Media theMedia)
  1966. ;
  1967.     IF ¬ GENERATINGCFM THEN
  1968.         Macro
  1969.         _DisposeTrackMedia
  1970.             moveq    #97,d0
  1971.             dc.w     $AAAA
  1972.         EndM
  1973.     ELSE
  1974.         IMPORT    DisposeTrackMedia
  1975.     ENDIF
  1976.  
  1977. ;
  1978. ; pascal Media GetTrackMedia(Track theTrack)
  1979. ;
  1980.     IF ¬ GENERATINGCFM THEN
  1981.         Macro
  1982.         _GetTrackMedia
  1983.             moveq    #98,d0
  1984.             dc.w     $AAAA
  1985.         EndM
  1986.     ELSE
  1987.         IMPORT    GetTrackMedia
  1988.     ENDIF
  1989.  
  1990. ;
  1991. ; pascal Track GetMediaTrack(Media theMedia)
  1992. ;
  1993.     IF ¬ GENERATINGCFM THEN
  1994.         Macro
  1995.         _GetMediaTrack
  1996.             move.w    #$C5,d0
  1997.             dc.w     $AAAA
  1998.         EndM
  1999.     ELSE
  2000.         IMPORT    GetMediaTrack
  2001.     ENDIF
  2002.  
  2003. ;************************
  2004. ;* Media State routines
  2005. ;*************************
  2006. ;
  2007. ; pascal unsigned long GetMediaCreationTime(Media theMedia)
  2008. ;
  2009.     IF ¬ GENERATINGCFM THEN
  2010.         Macro
  2011.         _GetMediaCreationTime
  2012.             moveq    #102,d0
  2013.             dc.w     $AAAA
  2014.         EndM
  2015.     ELSE
  2016.         IMPORT    GetMediaCreationTime
  2017.     ENDIF
  2018.  
  2019. ;
  2020. ; pascal unsigned long GetMediaModificationTime(Media theMedia)
  2021. ;
  2022.     IF ¬ GENERATINGCFM THEN
  2023.         Macro
  2024.         _GetMediaModificationTime
  2025.             moveq    #103,d0
  2026.             dc.w     $AAAA
  2027.         EndM
  2028.     ELSE
  2029.         IMPORT    GetMediaModificationTime
  2030.     ENDIF
  2031.  
  2032. ;
  2033. ; pascal TimeScale GetMediaTimeScale(Media theMedia)
  2034. ;
  2035.     IF ¬ GENERATINGCFM THEN
  2036.         Macro
  2037.         _GetMediaTimeScale
  2038.             moveq    #104,d0
  2039.             dc.w     $AAAA
  2040.         EndM
  2041.     ELSE
  2042.         IMPORT    GetMediaTimeScale
  2043.     ENDIF
  2044.  
  2045. ;
  2046. ; pascal void SetMediaTimeScale(Media theMedia, TimeScale timeScale)
  2047. ;
  2048.     IF ¬ GENERATINGCFM THEN
  2049.         Macro
  2050.         _SetMediaTimeScale
  2051.             moveq    #105,d0
  2052.             dc.w     $AAAA
  2053.         EndM
  2054.     ELSE
  2055.         IMPORT    SetMediaTimeScale
  2056.     ENDIF
  2057.  
  2058. ;
  2059. ; pascal TimeValue GetMediaDuration(Media theMedia)
  2060. ;
  2061.     IF ¬ GENERATINGCFM THEN
  2062.         Macro
  2063.         _GetMediaDuration
  2064.             moveq    #106,d0
  2065.             dc.w     $AAAA
  2066.         EndM
  2067.     ELSE
  2068.         IMPORT    GetMediaDuration
  2069.     ENDIF
  2070.  
  2071. ;
  2072. ; pascal short GetMediaLanguage(Media theMedia)
  2073. ;
  2074.     IF ¬ GENERATINGCFM THEN
  2075.         Macro
  2076.         _GetMediaLanguage
  2077.             moveq    #107,d0
  2078.             dc.w     $AAAA
  2079.         EndM
  2080.     ELSE
  2081.         IMPORT    GetMediaLanguage
  2082.     ENDIF
  2083.  
  2084. ;
  2085. ; pascal void SetMediaLanguage(Media theMedia, short language)
  2086. ;
  2087.     IF ¬ GENERATINGCFM THEN
  2088.         Macro
  2089.         _SetMediaLanguage
  2090.             moveq    #108,d0
  2091.             dc.w     $AAAA
  2092.         EndM
  2093.     ELSE
  2094.         IMPORT    SetMediaLanguage
  2095.     ENDIF
  2096.  
  2097. ;
  2098. ; pascal short GetMediaQuality(Media theMedia)
  2099. ;
  2100.     IF ¬ GENERATINGCFM THEN
  2101.         Macro
  2102.         _GetMediaQuality
  2103.             moveq    #109,d0
  2104.             dc.w     $AAAA
  2105.         EndM
  2106.     ELSE
  2107.         IMPORT    GetMediaQuality
  2108.     ENDIF
  2109.  
  2110. ;
  2111. ; pascal void SetMediaQuality(Media theMedia, short quality)
  2112. ;
  2113.     IF ¬ GENERATINGCFM THEN
  2114.         Macro
  2115.         _SetMediaQuality
  2116.             moveq    #110,d0
  2117.             dc.w     $AAAA
  2118.         EndM
  2119.     ELSE
  2120.         IMPORT    SetMediaQuality
  2121.     ENDIF
  2122.  
  2123. ;
  2124. ; pascal void GetMediaHandlerDescription(Media theMedia, OSType *mediaType, Str255 creatorName, OSType *creatorManufacturer)
  2125. ;
  2126.     IF ¬ GENERATINGCFM THEN
  2127.         Macro
  2128.         _GetMediaHandlerDescription
  2129.             moveq    #111,d0
  2130.             dc.w     $AAAA
  2131.         EndM
  2132.     ELSE
  2133.         IMPORT    GetMediaHandlerDescription
  2134.     ENDIF
  2135.  
  2136. ;
  2137. ; pascal UserData GetMediaUserData(Media theMedia)
  2138. ;
  2139.     IF ¬ GENERATINGCFM THEN
  2140.         Macro
  2141.         _GetMediaUserData
  2142.             moveq    #112,d0
  2143.             dc.w     $AAAA
  2144.         EndM
  2145.     ELSE
  2146.         IMPORT    GetMediaUserData
  2147.     ENDIF
  2148.  
  2149. ;
  2150. ; pascal OSErr GetMediaInputMap(Media theMedia, QTAtomContainer *inputMap)
  2151. ;
  2152.     IF ¬ GENERATINGCFM THEN
  2153.         Macro
  2154.         _GetMediaInputMap
  2155.             move.w    #$249,d0
  2156.             dc.w     $AAAA
  2157.         EndM
  2158.     ELSE
  2159.         IMPORT    GetMediaInputMap
  2160.     ENDIF
  2161.  
  2162. ;
  2163. ; pascal OSErr SetMediaInputMap(Media theMedia, QTAtomContainer inputMap)
  2164. ;
  2165.     IF ¬ GENERATINGCFM THEN
  2166.         Macro
  2167.         _SetMediaInputMap
  2168.             move.w    #$24A,d0
  2169.             dc.w     $AAAA
  2170.         EndM
  2171.     ELSE
  2172.         IMPORT    SetMediaInputMap
  2173.     ENDIF
  2174.  
  2175. ;************************
  2176. ;* Media Handler routines
  2177. ;*************************
  2178. ;
  2179. ; pascal MediaHandler GetMediaHandler(Media theMedia)
  2180. ;
  2181.     IF ¬ GENERATINGCFM THEN
  2182.         Macro
  2183.         _GetMediaHandler
  2184.             moveq    #113,d0
  2185.             dc.w     $AAAA
  2186.         EndM
  2187.     ELSE
  2188.         IMPORT    GetMediaHandler
  2189.     ENDIF
  2190.  
  2191. ;
  2192. ; pascal OSErr SetMediaHandler(Media theMedia, MediaHandlerComponent mH)
  2193. ;
  2194.     IF ¬ GENERATINGCFM THEN
  2195.         Macro
  2196.         _SetMediaHandler
  2197.             move.w    #$190,d0
  2198.             dc.w     $AAAA
  2199.         EndM
  2200.     ELSE
  2201.         IMPORT    SetMediaHandler
  2202.     ENDIF
  2203.  
  2204. ;************************
  2205. ;* Media's Data routines
  2206. ;*************************
  2207. ;
  2208. ; pascal OSErr BeginMediaEdits(Media theMedia)
  2209. ;
  2210.     IF ¬ GENERATINGCFM THEN
  2211.         Macro
  2212.         _BeginMediaEdits
  2213.             moveq    #114,d0
  2214.             dc.w     $AAAA
  2215.         EndM
  2216.     ELSE
  2217.         IMPORT    BeginMediaEdits
  2218.     ENDIF
  2219.  
  2220. ;
  2221. ; pascal OSErr EndMediaEdits(Media theMedia)
  2222. ;
  2223.     IF ¬ GENERATINGCFM THEN
  2224.         Macro
  2225.         _EndMediaEdits
  2226.             moveq    #115,d0
  2227.             dc.w     $AAAA
  2228.         EndM
  2229.     ELSE
  2230.         IMPORT    EndMediaEdits
  2231.     ENDIF
  2232.  
  2233. ;
  2234. ; pascal OSErr SetMediaDefaultDataRefIndex(Media theMedia, short index)
  2235. ;
  2236.     IF ¬ GENERATINGCFM THEN
  2237.         Macro
  2238.         _SetMediaDefaultDataRefIndex
  2239.             move.w    #$1E0,d0
  2240.             dc.w     $AAAA
  2241.         EndM
  2242.     ELSE
  2243.         IMPORT    SetMediaDefaultDataRefIndex
  2244.     ENDIF
  2245.  
  2246. ;
  2247. ; pascal void GetMediaDataHandlerDescription(Media theMedia, short index, OSType *dhType, Str255 creatorName, OSType *creatorManufacturer)
  2248. ;
  2249.     IF ¬ GENERATINGCFM THEN
  2250.         Macro
  2251.         _GetMediaDataHandlerDescription
  2252.             move.w    #$19E,d0
  2253.             dc.w     $AAAA
  2254.         EndM
  2255.     ELSE
  2256.         IMPORT    GetMediaDataHandlerDescription
  2257.     ENDIF
  2258.  
  2259. ;
  2260. ; pascal DataHandler GetMediaDataHandler(Media theMedia, short index)
  2261. ;
  2262.     IF ¬ GENERATINGCFM THEN
  2263.         Macro
  2264.         _GetMediaDataHandler
  2265.             move.w    #$19F,d0
  2266.             dc.w     $AAAA
  2267.         EndM
  2268.     ELSE
  2269.         IMPORT    GetMediaDataHandler
  2270.     ENDIF
  2271.  
  2272. ;
  2273. ; pascal OSErr SetMediaDataHandler(Media theMedia, short index, DataHandlerComponent dataHandler)
  2274. ;
  2275.     IF ¬ GENERATINGCFM THEN
  2276.         Macro
  2277.         _SetMediaDataHandler
  2278.             move.w    #$1A0,d0
  2279.             dc.w     $AAAA
  2280.         EndM
  2281.     ELSE
  2282.         IMPORT    SetMediaDataHandler
  2283.     ENDIF
  2284.  
  2285. ;
  2286. ; pascal Component GetDataHandler(Handle dataRef, OSType dataHandlerSubType, long flags)
  2287. ;
  2288.     IF ¬ GENERATINGCFM THEN
  2289.         Macro
  2290.         _GetDataHandler
  2291.             move.w    #$1ED,d0
  2292.             dc.w     $AAAA
  2293.         EndM
  2294.     ELSE
  2295.         IMPORT    GetDataHandler
  2296.     ENDIF
  2297.  
  2298. ;************************
  2299. ;* Media Sample Table Routines
  2300. ;*************************
  2301. ;
  2302. ; pascal long GetMediaSampleDescriptionCount(Media theMedia)
  2303. ;
  2304.     IF ¬ GENERATINGCFM THEN
  2305.         Macro
  2306.         _GetMediaSampleDescriptionCount
  2307.             moveq    #119,d0
  2308.             dc.w     $AAAA
  2309.         EndM
  2310.     ELSE
  2311.         IMPORT    GetMediaSampleDescriptionCount
  2312.     ENDIF
  2313.  
  2314. ;
  2315. ; pascal void GetMediaSampleDescription(Media theMedia, long index, SampleDescriptionHandle descH)
  2316. ;
  2317.     IF ¬ GENERATINGCFM THEN
  2318.         Macro
  2319.         _GetMediaSampleDescription
  2320.             moveq    #120,d0
  2321.             dc.w     $AAAA
  2322.         EndM
  2323.     ELSE
  2324.         IMPORT    GetMediaSampleDescription
  2325.     ENDIF
  2326.  
  2327. ;
  2328. ; pascal OSErr SetMediaSampleDescription(Media theMedia, long index, SampleDescriptionHandle descH)
  2329. ;
  2330.     IF ¬ GENERATINGCFM THEN
  2331.         Macro
  2332.         _SetMediaSampleDescription
  2333.             move.w    #$1D0,d0
  2334.             dc.w     $AAAA
  2335.         EndM
  2336.     ELSE
  2337.         IMPORT    SetMediaSampleDescription
  2338.     ENDIF
  2339.  
  2340. ;
  2341. ; pascal long GetMediaSampleCount(Media theMedia)
  2342. ;
  2343.     IF ¬ GENERATINGCFM THEN
  2344.         Macro
  2345.         _GetMediaSampleCount
  2346.             moveq    #121,d0
  2347.             dc.w     $AAAA
  2348.         EndM
  2349.     ELSE
  2350.         IMPORT    GetMediaSampleCount
  2351.     ENDIF
  2352.  
  2353. ;
  2354. ; pascal void SampleNumToMediaTime(Media theMedia, long logicalSampleNum, TimeValue *sampleTime, TimeValue *sampleDuration)
  2355. ;
  2356.     IF ¬ GENERATINGCFM THEN
  2357.         Macro
  2358.         _SampleNumToMediaTime
  2359.             moveq    #122,d0
  2360.             dc.w     $AAAA
  2361.         EndM
  2362.     ELSE
  2363.         IMPORT    SampleNumToMediaTime
  2364.     ENDIF
  2365.  
  2366. ;
  2367. ; pascal void MediaTimeToSampleNum(Media theMedia, TimeValue time, long *sampleNum, TimeValue *sampleTime, TimeValue *sampleDuration)
  2368. ;
  2369.     IF ¬ GENERATINGCFM THEN
  2370.         Macro
  2371.         _MediaTimeToSampleNum
  2372.             moveq    #123,d0
  2373.             dc.w     $AAAA
  2374.         EndM
  2375.     ELSE
  2376.         IMPORT    MediaTimeToSampleNum
  2377.     ENDIF
  2378.  
  2379. ;
  2380. ; pascal OSErr AddMediaSample(Media theMedia, Handle dataIn, long inOffset, unsigned long size, TimeValue durationPerSample, SampleDescriptionHandle sampleDescriptionH, long numberOfSamples, short sampleFlags, TimeValue *sampleTime)
  2381. ;
  2382.     IF ¬ GENERATINGCFM THEN
  2383.         Macro
  2384.         _AddMediaSample
  2385.             moveq    #124,d0
  2386.             dc.w     $AAAA
  2387.         EndM
  2388.     ELSE
  2389.         IMPORT    AddMediaSample
  2390.     ENDIF
  2391.  
  2392. ;
  2393. ; pascal OSErr AddMediaSampleReference(Media theMedia, long dataOffset, unsigned long size, TimeValue durationPerSample, SampleDescriptionHandle sampleDescriptionH, long numberOfSamples, short sampleFlags, TimeValue *sampleTime)
  2394. ;
  2395.     IF ¬ GENERATINGCFM THEN
  2396.         Macro
  2397.         _AddMediaSampleReference
  2398.             moveq    #125,d0
  2399.             dc.w     $AAAA
  2400.         EndM
  2401.     ELSE
  2402.         IMPORT    AddMediaSampleReference
  2403.     ENDIF
  2404.  
  2405. ;
  2406. ; pascal OSErr AddMediaSampleReferences(Media theMedia, SampleDescriptionHandle sampleDescriptionH, long numberOfSamples, SampleReferencePtr sampleRefs, TimeValue *sampleTime)
  2407. ;
  2408.     IF ¬ GENERATINGCFM THEN
  2409.         Macro
  2410.         _AddMediaSampleReferences
  2411.             move.w    #$1F7,d0
  2412.             dc.w     $AAAA
  2413.         EndM
  2414.     ELSE
  2415.         IMPORT    AddMediaSampleReferences
  2416.     ENDIF
  2417.  
  2418. ;
  2419. ; pascal OSErr GetMediaSample(Media theMedia, Handle dataOut, long maxSizeToGrow, long *size, TimeValue time, TimeValue *sampleTime, TimeValue *durationPerSample, SampleDescriptionHandle sampleDescriptionH, long *sampleDescriptionIndex, long maxNumberOfSamples, long *numberOfSamples, short *sampleFlags)
  2420. ;
  2421.     IF ¬ GENERATINGCFM THEN
  2422.         Macro
  2423.         _GetMediaSample
  2424.             moveq    #126,d0
  2425.             dc.w     $AAAA
  2426.         EndM
  2427.     ELSE
  2428.         IMPORT    GetMediaSample
  2429.     ENDIF
  2430.  
  2431. ;
  2432. ; pascal OSErr GetMediaSampleReference(Media theMedia, long *dataOffset, long *size, TimeValue time, TimeValue *sampleTime, TimeValue *durationPerSample, SampleDescriptionHandle sampleDescriptionH, long *sampleDescriptionIndex, long maxNumberOfSamples, long *numberOfSamples, short *sampleFlags)
  2433. ;
  2434.     IF ¬ GENERATINGCFM THEN
  2435.         Macro
  2436.         _GetMediaSampleReference
  2437.             moveq    #127,d0
  2438.             dc.w     $AAAA
  2439.         EndM
  2440.     ELSE
  2441.         IMPORT    GetMediaSampleReference
  2442.     ENDIF
  2443.  
  2444. ;
  2445. ; pascal OSErr GetMediaSampleReferences(Media theMedia, TimeValue time, TimeValue *sampleTime, SampleDescriptionHandle sampleDescriptionH, long *sampleDescriptionIndex, long maxNumberOfEntries, long *actualNumberofEntries, SampleReferencePtr sampleRefs)
  2446. ;
  2447.     IF ¬ GENERATINGCFM THEN
  2448.         Macro
  2449.         _GetMediaSampleReferences
  2450.             move.w    #$235,d0
  2451.             dc.w     $AAAA
  2452.         EndM
  2453.     ELSE
  2454.         IMPORT    GetMediaSampleReferences
  2455.     ENDIF
  2456.  
  2457. ;
  2458. ; pascal OSErr SetMediaPreferredChunkSize(Media theMedia, long maxChunkSize)
  2459. ;
  2460.     IF ¬ GENERATINGCFM THEN
  2461.         Macro
  2462.         _SetMediaPreferredChunkSize
  2463.             move.w    #$1F8,d0
  2464.             dc.w     $AAAA
  2465.         EndM
  2466.     ELSE
  2467.         IMPORT    SetMediaPreferredChunkSize
  2468.     ENDIF
  2469.  
  2470. ;
  2471. ; pascal OSErr GetMediaPreferredChunkSize(Media theMedia, long *maxChunkSize)
  2472. ;
  2473.     IF ¬ GENERATINGCFM THEN
  2474.         Macro
  2475.         _GetMediaPreferredChunkSize
  2476.             move.w    #$1F9,d0
  2477.             dc.w     $AAAA
  2478.         EndM
  2479.     ELSE
  2480.         IMPORT    GetMediaPreferredChunkSize
  2481.     ENDIF
  2482.  
  2483. ;
  2484. ; pascal OSErr SetMediaShadowSync(Media theMedia, long frameDiffSampleNum, long syncSampleNum)
  2485. ;
  2486.     IF ¬ GENERATINGCFM THEN
  2487.         Macro
  2488.         _SetMediaShadowSync
  2489.             move.w    #$121,d0
  2490.             dc.w     $AAAA
  2491.         EndM
  2492.     ELSE
  2493.         IMPORT    SetMediaShadowSync
  2494.     ENDIF
  2495.  
  2496. ;
  2497. ; pascal OSErr GetMediaShadowSync(Media theMedia, long frameDiffSampleNum, long *syncSampleNum)
  2498. ;
  2499.     IF ¬ GENERATINGCFM THEN
  2500.         Macro
  2501.         _GetMediaShadowSync
  2502.             move.w    #$122,d0
  2503.             dc.w     $AAAA
  2504.         EndM
  2505.     ELSE
  2506.         IMPORT    GetMediaShadowSync
  2507.     ENDIF
  2508.  
  2509. ;************************
  2510. ;* Editing Routines
  2511. ;*************************
  2512. ;
  2513. ; pascal OSErr InsertMediaIntoTrack(Track theTrack, TimeValue trackStart, TimeValue mediaTime, TimeValue mediaDuration, Fixed mediaRate)
  2514. ;
  2515.     IF ¬ GENERATINGCFM THEN
  2516.         Macro
  2517.         _InsertMediaIntoTrack
  2518.             move.w    #$183,d0
  2519.             dc.w     $AAAA
  2520.         EndM
  2521.     ELSE
  2522.         IMPORT    InsertMediaIntoTrack
  2523.     ENDIF
  2524.  
  2525. ;
  2526. ; pascal OSErr InsertTrackSegment(Track srcTrack, Track dstTrack, TimeValue srcIn, TimeValue srcDuration, TimeValue dstIn)
  2527. ;
  2528.     IF ¬ GENERATINGCFM THEN
  2529.         Macro
  2530.         _InsertTrackSegment
  2531.             move.w    #$85,d0
  2532.             dc.w     $AAAA
  2533.         EndM
  2534.     ELSE
  2535.         IMPORT    InsertTrackSegment
  2536.     ENDIF
  2537.  
  2538. ;
  2539. ; pascal OSErr InsertMovieSegment(Movie srcMovie, Movie dstMovie, TimeValue srcIn, TimeValue srcDuration, TimeValue dstIn)
  2540. ;
  2541.     IF ¬ GENERATINGCFM THEN
  2542.         Macro
  2543.         _InsertMovieSegment
  2544.             move.w    #$86,d0
  2545.             dc.w     $AAAA
  2546.         EndM
  2547.     ELSE
  2548.         IMPORT    InsertMovieSegment
  2549.     ENDIF
  2550.  
  2551. ;
  2552. ; pascal OSErr InsertEmptyTrackSegment(Track dstTrack, TimeValue dstIn, TimeValue dstDuration)
  2553. ;
  2554.     IF ¬ GENERATINGCFM THEN
  2555.         Macro
  2556.         _InsertEmptyTrackSegment
  2557.             move.w    #$87,d0
  2558.             dc.w     $AAAA
  2559.         EndM
  2560.     ELSE
  2561.         IMPORT    InsertEmptyTrackSegment
  2562.     ENDIF
  2563.  
  2564. ;
  2565. ; pascal OSErr InsertEmptyMovieSegment(Movie dstMovie, TimeValue dstIn, TimeValue dstDuration)
  2566. ;
  2567.     IF ¬ GENERATINGCFM THEN
  2568.         Macro
  2569.         _InsertEmptyMovieSegment
  2570.             move.w    #$88,d0
  2571.             dc.w     $AAAA
  2572.         EndM
  2573.     ELSE
  2574.         IMPORT    InsertEmptyMovieSegment
  2575.     ENDIF
  2576.  
  2577. ;
  2578. ; pascal OSErr DeleteTrackSegment(Track theTrack, TimeValue startTime, TimeValue duration)
  2579. ;
  2580.     IF ¬ GENERATINGCFM THEN
  2581.         Macro
  2582.         _DeleteTrackSegment
  2583.             move.w    #$89,d0
  2584.             dc.w     $AAAA
  2585.         EndM
  2586.     ELSE
  2587.         IMPORT    DeleteTrackSegment
  2588.     ENDIF
  2589.  
  2590. ;
  2591. ; pascal OSErr DeleteMovieSegment(Movie theMovie, TimeValue startTime, TimeValue duration)
  2592. ;
  2593.     IF ¬ GENERATINGCFM THEN
  2594.         Macro
  2595.         _DeleteMovieSegment
  2596.             move.w    #$8A,d0
  2597.             dc.w     $AAAA
  2598.         EndM
  2599.     ELSE
  2600.         IMPORT    DeleteMovieSegment
  2601.     ENDIF
  2602.  
  2603. ;
  2604. ; pascal OSErr ScaleTrackSegment(Track theTrack, TimeValue startTime, TimeValue oldDuration, TimeValue newDuration)
  2605. ;
  2606.     IF ¬ GENERATINGCFM THEN
  2607.         Macro
  2608.         _ScaleTrackSegment
  2609.             move.w    #$8B,d0
  2610.             dc.w     $AAAA
  2611.         EndM
  2612.     ELSE
  2613.         IMPORT    ScaleTrackSegment
  2614.     ENDIF
  2615.  
  2616. ;
  2617. ; pascal OSErr ScaleMovieSegment(Movie theMovie, TimeValue startTime, TimeValue oldDuration, TimeValue newDuration)
  2618. ;
  2619.     IF ¬ GENERATINGCFM THEN
  2620.         Macro
  2621.         _ScaleMovieSegment
  2622.             move.w    #$8C,d0
  2623.             dc.w     $AAAA
  2624.         EndM
  2625.     ELSE
  2626.         IMPORT    ScaleMovieSegment
  2627.     ENDIF
  2628.  
  2629. ;************************
  2630. ;* Hi-level Editing Routines
  2631. ;*************************
  2632. ;
  2633. ; pascal Movie CutMovieSelection(Movie theMovie)
  2634. ;
  2635.     IF ¬ GENERATINGCFM THEN
  2636.         Macro
  2637.         _CutMovieSelection
  2638.             move.w    #$8D,d0
  2639.             dc.w     $AAAA
  2640.         EndM
  2641.     ELSE
  2642.         IMPORT    CutMovieSelection
  2643.     ENDIF
  2644.  
  2645. ;
  2646. ; pascal Movie CopyMovieSelection(Movie theMovie)
  2647. ;
  2648.     IF ¬ GENERATINGCFM THEN
  2649.         Macro
  2650.         _CopyMovieSelection
  2651.             move.w    #$8E,d0
  2652.             dc.w     $AAAA
  2653.         EndM
  2654.     ELSE
  2655.         IMPORT    CopyMovieSelection
  2656.     ENDIF
  2657.  
  2658. ;
  2659. ; pascal void PasteMovieSelection(Movie theMovie, Movie src)
  2660. ;
  2661.     IF ¬ GENERATINGCFM THEN
  2662.         Macro
  2663.         _PasteMovieSelection
  2664.             move.w    #$8F,d0
  2665.             dc.w     $AAAA
  2666.         EndM
  2667.     ELSE
  2668.         IMPORT    PasteMovieSelection
  2669.     ENDIF
  2670.  
  2671. ;
  2672. ; pascal void AddMovieSelection(Movie theMovie, Movie src)
  2673. ;
  2674.     IF ¬ GENERATINGCFM THEN
  2675.         Macro
  2676.         _AddMovieSelection
  2677.             move.w    #$152,d0
  2678.             dc.w     $AAAA
  2679.         EndM
  2680.     ELSE
  2681.         IMPORT    AddMovieSelection
  2682.     ENDIF
  2683.  
  2684. ;
  2685. ; pascal void ClearMovieSelection(Movie theMovie)
  2686. ;
  2687.     IF ¬ GENERATINGCFM THEN
  2688.         Macro
  2689.         _ClearMovieSelection
  2690.             move.w    #$E1,d0
  2691.             dc.w     $AAAA
  2692.         EndM
  2693.     ELSE
  2694.         IMPORT    ClearMovieSelection
  2695.     ENDIF
  2696.  
  2697. ;
  2698. ; pascal OSErr PasteHandleIntoMovie(Handle h, OSType handleType, Movie theMovie, long flags, ComponentInstance userComp)
  2699. ;
  2700.     IF ¬ GENERATINGCFM THEN
  2701.         Macro
  2702.         _PasteHandleIntoMovie
  2703.             move.w    #$CB,d0
  2704.             dc.w     $AAAA
  2705.         EndM
  2706.     ELSE
  2707.         IMPORT    PasteHandleIntoMovie
  2708.     ENDIF
  2709.  
  2710. ;
  2711. ; pascal OSErr PutMovieIntoTypedHandle(Movie theMovie, Track targetTrack, OSType handleType, Handle publicMovie, TimeValue start, TimeValue dur, long flags, ComponentInstance userComp)
  2712. ;
  2713.     IF ¬ GENERATINGCFM THEN
  2714.         Macro
  2715.         _PutMovieIntoTypedHandle
  2716.             move.w    #$1CD,d0
  2717.             dc.w     $AAAA
  2718.         EndM
  2719.     ELSE
  2720.         IMPORT    PutMovieIntoTypedHandle
  2721.     ENDIF
  2722.  
  2723. ;
  2724. ; pascal Component IsScrapMovie(Track targetTrack)
  2725. ;
  2726.     IF ¬ GENERATINGCFM THEN
  2727.         Macro
  2728.         _IsScrapMovie
  2729.             move.w    #$CC,d0
  2730.             dc.w     $AAAA
  2731.         EndM
  2732.     ELSE
  2733.         IMPORT    IsScrapMovie
  2734.     ENDIF
  2735.  
  2736. ;************************
  2737. ;* Middle-level Editing Routines
  2738. ;*************************
  2739. ;
  2740. ; pascal OSErr CopyTrackSettings(Track srcTrack, Track dstTrack)
  2741. ;
  2742.     IF ¬ GENERATINGCFM THEN
  2743.         Macro
  2744.         _CopyTrackSettings
  2745.             move.w    #$153,d0
  2746.             dc.w     $AAAA
  2747.         EndM
  2748.     ELSE
  2749.         IMPORT    CopyTrackSettings
  2750.     ENDIF
  2751.  
  2752. ;
  2753. ; pascal OSErr CopyMovieSettings(Movie srcMovie, Movie dstMovie)
  2754. ;
  2755.     IF ¬ GENERATINGCFM THEN
  2756.         Macro
  2757.         _CopyMovieSettings
  2758.             move.w    #$154,d0
  2759.             dc.w     $AAAA
  2760.         EndM
  2761.     ELSE
  2762.         IMPORT    CopyMovieSettings
  2763.     ENDIF
  2764.  
  2765. ;
  2766. ; pascal OSErr AddEmptyTrackToMovie(Track srcTrack, Movie dstMovie, Handle dataRef, OSType dataRefType, Track *dstTrack)
  2767. ;
  2768.     IF ¬ GENERATINGCFM THEN
  2769.         Macro
  2770.         _AddEmptyTrackToMovie
  2771.             moveq    #116,d0
  2772.             dc.w     $AAAA
  2773.         EndM
  2774.     ELSE
  2775.         IMPORT    AddEmptyTrackToMovie
  2776.     ENDIF
  2777.  
  2778. ;************************
  2779. ;* movie & track edit state routines
  2780. ;*************************
  2781. ;
  2782. ; pascal MovieEditState NewMovieEditState(Movie theMovie)
  2783. ;
  2784.     IF ¬ GENERATINGCFM THEN
  2785.         Macro
  2786.         _NewMovieEditState
  2787.             move.w    #$104,d0
  2788.             dc.w     $AAAA
  2789.         EndM
  2790.     ELSE
  2791.         IMPORT    NewMovieEditState
  2792.     ENDIF
  2793.  
  2794. ;
  2795. ; pascal OSErr UseMovieEditState(Movie theMovie, MovieEditState toState)
  2796. ;
  2797.     IF ¬ GENERATINGCFM THEN
  2798.         Macro
  2799.         _UseMovieEditState
  2800.             move.w    #$105,d0
  2801.             dc.w     $AAAA
  2802.         EndM
  2803.     ELSE
  2804.         IMPORT    UseMovieEditState
  2805.     ENDIF
  2806.  
  2807. ;
  2808. ; pascal OSErr DisposeMovieEditState(MovieEditState state)
  2809. ;
  2810.     IF ¬ GENERATINGCFM THEN
  2811.         Macro
  2812.         _DisposeMovieEditState
  2813.             move.w    #$106,d0
  2814.             dc.w     $AAAA
  2815.         EndM
  2816.     ELSE
  2817.         IMPORT    DisposeMovieEditState
  2818.     ENDIF
  2819.  
  2820. ;
  2821. ; pascal TrackEditState NewTrackEditState(Track theTrack)
  2822. ;
  2823.     IF ¬ GENERATINGCFM THEN
  2824.         Macro
  2825.         _NewTrackEditState
  2826.             move.w    #$107,d0
  2827.             dc.w     $AAAA
  2828.         EndM
  2829.     ELSE
  2830.         IMPORT    NewTrackEditState
  2831.     ENDIF
  2832.  
  2833. ;
  2834. ; pascal OSErr UseTrackEditState(Track theTrack, TrackEditState state)
  2835. ;
  2836.     IF ¬ GENERATINGCFM THEN
  2837.         Macro
  2838.         _UseTrackEditState
  2839.             move.w    #$108,d0
  2840.             dc.w     $AAAA
  2841.         EndM
  2842.     ELSE
  2843.         IMPORT    UseTrackEditState
  2844.     ENDIF
  2845.  
  2846. ;
  2847. ; pascal OSErr DisposeTrackEditState(TrackEditState state)
  2848. ;
  2849.     IF ¬ GENERATINGCFM THEN
  2850.         Macro
  2851.         _DisposeTrackEditState
  2852.             move.w    #$109,d0
  2853.             dc.w     $AAAA
  2854.         EndM
  2855.     ELSE
  2856.         IMPORT    DisposeTrackEditState
  2857.     ENDIF
  2858.  
  2859. ;************************
  2860. ;* track reference routines
  2861. ;*************************
  2862. ;
  2863. ; pascal OSErr AddTrackReference(Track theTrack, Track refTrack, OSType refType, long *addedIndex)
  2864. ;
  2865.     IF ¬ GENERATINGCFM THEN
  2866.         Macro
  2867.         _AddTrackReference
  2868.             move.w    #$1F0,d0
  2869.             dc.w     $AAAA
  2870.         EndM
  2871.     ELSE
  2872.         IMPORT    AddTrackReference
  2873.     ENDIF
  2874.  
  2875. ;
  2876. ; pascal OSErr DeleteTrackReference(Track theTrack, OSType refType, long index)
  2877. ;
  2878.     IF ¬ GENERATINGCFM THEN
  2879.         Macro
  2880.         _DeleteTrackReference
  2881.             move.w    #$1F1,d0
  2882.             dc.w     $AAAA
  2883.         EndM
  2884.     ELSE
  2885.         IMPORT    DeleteTrackReference
  2886.     ENDIF
  2887.  
  2888. ;
  2889. ; pascal OSErr SetTrackReference(Track theTrack, Track refTrack, OSType refType, long index)
  2890. ;
  2891.     IF ¬ GENERATINGCFM THEN
  2892.         Macro
  2893.         _SetTrackReference
  2894.             move.w    #$1F2,d0
  2895.             dc.w     $AAAA
  2896.         EndM
  2897.     ELSE
  2898.         IMPORT    SetTrackReference
  2899.     ENDIF
  2900.  
  2901. ;
  2902. ; pascal Track GetTrackReference(Track theTrack, OSType refType, long index)
  2903. ;
  2904.     IF ¬ GENERATINGCFM THEN
  2905.         Macro
  2906.         _GetTrackReference
  2907.             move.w    #$1F3,d0
  2908.             dc.w     $AAAA
  2909.         EndM
  2910.     ELSE
  2911.         IMPORT    GetTrackReference
  2912.     ENDIF
  2913.  
  2914. ;
  2915. ; pascal OSType GetNextTrackReferenceType(Track theTrack, OSType refType)
  2916. ;
  2917.     IF ¬ GENERATINGCFM THEN
  2918.         Macro
  2919.         _GetNextTrackReferenceType
  2920.             move.w    #$1F4,d0
  2921.             dc.w     $AAAA
  2922.         EndM
  2923.     ELSE
  2924.         IMPORT    GetNextTrackReferenceType
  2925.     ENDIF
  2926.  
  2927. ;
  2928. ; pascal long GetTrackReferenceCount(Track theTrack, OSType refType)
  2929. ;
  2930.     IF ¬ GENERATINGCFM THEN
  2931.         Macro
  2932.         _GetTrackReferenceCount
  2933.             move.w    #$1F5,d0
  2934.             dc.w     $AAAA
  2935.         EndM
  2936.     ELSE
  2937.         IMPORT    GetTrackReferenceCount
  2938.     ENDIF
  2939.  
  2940. ;************************
  2941. ;* modifier track types
  2942. ;*************************
  2943.     kTrackModifierReference: SET 'ssrc'
  2944.     kTrackModifierInput: SET 'in'
  2945.     kTrackModifierType: SET 'ty'
  2946.     kTrackModifierTypeMatrix: SET 1
  2947.     kTrackModifierTypeClip: SET 2
  2948.     kTrackModifierTypeGraphicsMode: SET 5
  2949.     kTrackModifierTypeVolume: SET 3
  2950.     kTrackModifierTypeBalance: SET 4
  2951.     kTrackModifierTypeSpriteImage: SET 'vide'
  2952. ModifierTrackGraphicsModeRecord RECORD    0
  2953. graphicsMode             ds.l    1
  2954. opColor                     ds        RGBColor
  2955. sizeof                     EQU    *
  2956.                         ENDR
  2957.  
  2958. ; typedef struct ModifierTrackGraphicsModeRecord  ModifierTrackGraphicsModeRecord
  2959. ;************************
  2960. ;* high level file conversion routines
  2961. ;*************************
  2962. ;
  2963. ; pascal OSErr ConvertFileToMovieFile(const FSSpec *inputFile, const FSSpec *outputFile, OSType creator, ScriptCode scriptTag, short *resID, long flags, ComponentInstance userComp, MovieProgressUPP proc, long refCon)
  2964. ;
  2965.     IF ¬ GENERATINGCFM THEN
  2966.         Macro
  2967.         _ConvertFileToMovieFile
  2968.             move.w    #$1CB,d0
  2969.             dc.w     $AAAA
  2970.         EndM
  2971.     ELSE
  2972.         IMPORT    ConvertFileToMovieFile
  2973.     ENDIF
  2974.  
  2975. ;
  2976. ; pascal OSErr ConvertMovieToFile(Movie theMovie, Track onlyTrack, FSSpec *outputFile, OSType fileType, OSType creator, ScriptCode scriptTag, short *resID, long flags, ComponentInstance userComp)
  2977. ;
  2978.     IF ¬ GENERATINGCFM THEN
  2979.         Macro
  2980.         _ConvertMovieToFile
  2981.             move.w    #$1CC,d0
  2982.             dc.w     $AAAA
  2983.         EndM
  2984.     ELSE
  2985.         IMPORT    ConvertMovieToFile
  2986.     ENDIF
  2987.  
  2988. ;************************
  2989. ;* Movie Timebase Conversion Routines
  2990. ;*************************
  2991. ;
  2992. ; pascal TimeValue TrackTimeToMediaTime(TimeValue value, Track theTrack)
  2993. ;
  2994.     IF ¬ GENERATINGCFM THEN
  2995.         Macro
  2996.         _TrackTimeToMediaTime
  2997.             move.w    #$96,d0
  2998.             dc.w     $AAAA
  2999.         EndM
  3000.     ELSE
  3001.         IMPORT    TrackTimeToMediaTime
  3002.     ENDIF
  3003.  
  3004. ;
  3005. ; pascal Fixed GetTrackEditRate(Track theTrack, TimeValue atTime)
  3006. ;
  3007.     IF ¬ GENERATINGCFM THEN
  3008.         Macro
  3009.         _GetTrackEditRate
  3010.             move.w    #$123,d0
  3011.             dc.w     $AAAA
  3012.         EndM
  3013.     ELSE
  3014.         IMPORT    GetTrackEditRate
  3015.     ENDIF
  3016.  
  3017. ;************************
  3018. ;* Miscellaneous Routines
  3019. ;*************************
  3020. ;
  3021. ; pascal long GetMovieDataSize(Movie theMovie, TimeValue startTime, TimeValue duration)
  3022. ;
  3023.     IF ¬ GENERATINGCFM THEN
  3024.         Macro
  3025.         _GetMovieDataSize
  3026.             move.w    #$98,d0
  3027.             dc.w     $AAAA
  3028.         EndM
  3029.     ELSE
  3030.         IMPORT    GetMovieDataSize
  3031.     ENDIF
  3032.  
  3033. ;
  3034. ; pascal long GetTrackDataSize(Track theTrack, TimeValue startTime, TimeValue duration)
  3035. ;
  3036.     IF ¬ GENERATINGCFM THEN
  3037.         Macro
  3038.         _GetTrackDataSize
  3039.             move.w    #$149,d0
  3040.             dc.w     $AAAA
  3041.         EndM
  3042.     ELSE
  3043.         IMPORT    GetTrackDataSize
  3044.     ENDIF
  3045.  
  3046. ;
  3047. ; pascal long GetMediaDataSize(Media theMedia, TimeValue startTime, TimeValue duration)
  3048. ;
  3049.     IF ¬ GENERATINGCFM THEN
  3050.         Macro
  3051.         _GetMediaDataSize
  3052.             move.w    #$99,d0
  3053.             dc.w     $AAAA
  3054.         EndM
  3055.     ELSE
  3056.         IMPORT    GetMediaDataSize
  3057.     ENDIF
  3058.  
  3059. ;
  3060. ; pascal Boolean PtInMovie(Movie theMovie, Point pt)
  3061. ;
  3062.     IF ¬ GENERATINGCFM THEN
  3063.         Macro
  3064.         _PtInMovie
  3065.             move.w    #$9A,d0
  3066.             dc.w     $AAAA
  3067.         EndM
  3068.     ELSE
  3069.         IMPORT    PtInMovie
  3070.     ENDIF
  3071.  
  3072. ;
  3073. ; pascal Boolean PtInTrack(Track theTrack, Point pt)
  3074. ;
  3075.     IF ¬ GENERATINGCFM THEN
  3076.         Macro
  3077.         _PtInTrack
  3078.             move.w    #$9B,d0
  3079.             dc.w     $AAAA
  3080.         EndM
  3081.     ELSE
  3082.         IMPORT    PtInTrack
  3083.     ENDIF
  3084.  
  3085. ;************************
  3086. ;* Group Selection Routines
  3087. ;*************************
  3088. ;
  3089. ; pascal void SetMovieLanguage(Movie theMovie, long language)
  3090. ;
  3091.     IF ¬ GENERATINGCFM THEN
  3092.         Macro
  3093.         _SetMovieLanguage
  3094.             move.w    #$9C,d0
  3095.             dc.w     $AAAA
  3096.         EndM
  3097.     ELSE
  3098.         IMPORT    SetMovieLanguage
  3099.     ENDIF
  3100.  
  3101. ;************************
  3102. ;* User Data
  3103. ;*************************
  3104. ;
  3105. ; pascal OSErr GetUserData(UserData theUserData, Handle data, OSType udType, long index)
  3106. ;
  3107.     IF ¬ GENERATINGCFM THEN
  3108.         Macro
  3109.         _GetUserData
  3110.             move.w    #$9E,d0
  3111.             dc.w     $AAAA
  3112.         EndM
  3113.     ELSE
  3114.         IMPORT    GetUserData
  3115.     ENDIF
  3116.  
  3117. ;
  3118. ; pascal OSErr AddUserData(UserData theUserData, Handle data, OSType udType)
  3119. ;
  3120.     IF ¬ GENERATINGCFM THEN
  3121.         Macro
  3122.         _AddUserData
  3123.             move.w    #$9F,d0
  3124.             dc.w     $AAAA
  3125.         EndM
  3126.     ELSE
  3127.         IMPORT    AddUserData
  3128.     ENDIF
  3129.  
  3130. ;
  3131. ; pascal OSErr RemoveUserData(UserData theUserData, OSType udType, long index)
  3132. ;
  3133.     IF ¬ GENERATINGCFM THEN
  3134.         Macro
  3135.         _RemoveUserData
  3136.             move.w    #$A0,d0
  3137.             dc.w     $AAAA
  3138.         EndM
  3139.     ELSE
  3140.         IMPORT    RemoveUserData
  3141.     ENDIF
  3142.  
  3143. ;
  3144. ; pascal short CountUserDataType(UserData theUserData, OSType udType)
  3145. ;
  3146.     IF ¬ GENERATINGCFM THEN
  3147.         Macro
  3148.         _CountUserDataType
  3149.             move.w    #$14B,d0
  3150.             dc.w     $AAAA
  3151.         EndM
  3152.     ELSE
  3153.         IMPORT    CountUserDataType
  3154.     ENDIF
  3155.  
  3156. ;
  3157. ; pascal long GetNextUserDataType(UserData theUserData, OSType udType)
  3158. ;
  3159.     IF ¬ GENERATINGCFM THEN
  3160.         Macro
  3161.         _GetNextUserDataType
  3162.             move.w    #$1A5,d0
  3163.             dc.w     $AAAA
  3164.         EndM
  3165.     ELSE
  3166.         IMPORT    GetNextUserDataType
  3167.     ENDIF
  3168.  
  3169. ;
  3170. ; pascal OSErr GetUserDataItem(UserData theUserData, void *data, long size, OSType udType, long index)
  3171. ;
  3172.     IF ¬ GENERATINGCFM THEN
  3173.         Macro
  3174.         _GetUserDataItem
  3175.             move.w    #$126,d0
  3176.             dc.w     $AAAA
  3177.         EndM
  3178.     ELSE
  3179.         IMPORT    GetUserDataItem
  3180.     ENDIF
  3181.  
  3182. ;
  3183. ; pascal OSErr SetUserDataItem(UserData theUserData, void *data, long size, OSType udType, long index)
  3184. ;
  3185.     IF ¬ GENERATINGCFM THEN
  3186.         Macro
  3187.         _SetUserDataItem
  3188.             move.w    #$12E,d0
  3189.             dc.w     $AAAA
  3190.         EndM
  3191.     ELSE
  3192.         IMPORT    SetUserDataItem
  3193.     ENDIF
  3194.  
  3195. ;
  3196. ; pascal OSErr AddUserDataText(UserData theUserData, Handle data, OSType udType, long index, short itlRegionTag)
  3197. ;
  3198.     IF ¬ GENERATINGCFM THEN
  3199.         Macro
  3200.         _AddUserDataText
  3201.             move.w    #$14C,d0
  3202.             dc.w     $AAAA
  3203.         EndM
  3204.     ELSE
  3205.         IMPORT    AddUserDataText
  3206.     ENDIF
  3207.  
  3208. ;
  3209. ; pascal OSErr GetUserDataText(UserData theUserData, Handle data, OSType udType, long index, short itlRegionTag)
  3210. ;
  3211.     IF ¬ GENERATINGCFM THEN
  3212.         Macro
  3213.         _GetUserDataText
  3214.             move.w    #$14D,d0
  3215.             dc.w     $AAAA
  3216.         EndM
  3217.     ELSE
  3218.         IMPORT    GetUserDataText
  3219.     ENDIF
  3220.  
  3221. ;
  3222. ; pascal OSErr RemoveUserDataText(UserData theUserData, OSType udType, long index, short itlRegionTag)
  3223. ;
  3224.     IF ¬ GENERATINGCFM THEN
  3225.         Macro
  3226.         _RemoveUserDataText
  3227.             move.w    #$14E,d0
  3228.             dc.w     $AAAA
  3229.         EndM
  3230.     ELSE
  3231.         IMPORT    RemoveUserDataText
  3232.     ENDIF
  3233.  
  3234. ;
  3235. ; pascal OSErr NewUserData(UserData *theUserData)
  3236. ;
  3237.     IF ¬ GENERATINGCFM THEN
  3238.         Macro
  3239.         _NewUserData
  3240.             move.w    #$12F,d0
  3241.             dc.w     $AAAA
  3242.         EndM
  3243.     ELSE
  3244.         IMPORT    NewUserData
  3245.     ENDIF
  3246.  
  3247. ;
  3248. ; pascal OSErr DisposeUserData(UserData theUserData)
  3249. ;
  3250.     IF ¬ GENERATINGCFM THEN
  3251.         Macro
  3252.         _DisposeUserData
  3253.             move.w    #$130,d0
  3254.             dc.w     $AAAA
  3255.         EndM
  3256.     ELSE
  3257.         IMPORT    DisposeUserData
  3258.     ENDIF
  3259.  
  3260. ;
  3261. ; pascal OSErr NewUserDataFromHandle(Handle h, UserData *theUserData)
  3262. ;
  3263.     IF ¬ GENERATINGCFM THEN
  3264.         Macro
  3265.         _NewUserDataFromHandle
  3266.             move.w    #$131,d0
  3267.             dc.w     $AAAA
  3268.         EndM
  3269.     ELSE
  3270.         IMPORT    NewUserDataFromHandle
  3271.     ENDIF
  3272.  
  3273. ;
  3274. ; pascal OSErr PutUserDataIntoHandle(UserData theUserData, Handle h)
  3275. ;
  3276.     IF ¬ GENERATINGCFM THEN
  3277.         Macro
  3278.         _PutUserDataIntoHandle
  3279.             move.w    #$132,d0
  3280.             dc.w     $AAAA
  3281.         EndM
  3282.     ELSE
  3283.         IMPORT    PutUserDataIntoHandle
  3284.     ENDIF
  3285.  
  3286. ;
  3287. ; pascal void GetMediaNextInterestingTime(Media theMedia, short interestingTimeFlags, TimeValue time, Fixed rate, TimeValue *interestingTime, TimeValue *interestingDuration)
  3288. ;
  3289.     IF ¬ GENERATINGCFM THEN
  3290.         Macro
  3291.         _GetMediaNextInterestingTime
  3292.             move.w    #$16D,d0
  3293.             dc.w     $AAAA
  3294.         EndM
  3295.     ELSE
  3296.         IMPORT    GetMediaNextInterestingTime
  3297.     ENDIF
  3298.  
  3299. ;
  3300. ; pascal void GetTrackNextInterestingTime(Track theTrack, short interestingTimeFlags, TimeValue time, Fixed rate, TimeValue *interestingTime, TimeValue *interestingDuration)
  3301. ;
  3302.     IF ¬ GENERATINGCFM THEN
  3303.         Macro
  3304.         _GetTrackNextInterestingTime
  3305.             move.w    #$E2,d0
  3306.             dc.w     $AAAA
  3307.         EndM
  3308.     ELSE
  3309.         IMPORT    GetTrackNextInterestingTime
  3310.     ENDIF
  3311.  
  3312. ;
  3313. ; pascal void GetMovieNextInterestingTime(Movie theMovie, short interestingTimeFlags, short numMediaTypes, const OSType *whichMediaTypes, TimeValue time, Fixed rate, TimeValue *interestingTime, TimeValue *interestingDuration)
  3314. ;
  3315.     IF ¬ GENERATINGCFM THEN
  3316.         Macro
  3317.         _GetMovieNextInterestingTime
  3318.             move.w    #$10E,d0
  3319.             dc.w     $AAAA
  3320.         EndM
  3321.     ELSE
  3322.         IMPORT    GetMovieNextInterestingTime
  3323.     ENDIF
  3324.  
  3325. ;
  3326. ; pascal OSErr CreateMovieFile(const FSSpec *fileSpec, OSType creator, ScriptCode scriptTag, long createMovieFileFlags, short *resRefNum, Movie *newmovie)
  3327. ;
  3328.     IF ¬ GENERATINGCFM THEN
  3329.         Macro
  3330.         _CreateMovieFile
  3331.             move.w    #$191,d0
  3332.             dc.w     $AAAA
  3333.         EndM
  3334.     ELSE
  3335.         IMPORT    CreateMovieFile
  3336.     ENDIF
  3337.  
  3338. ;
  3339. ; pascal OSErr OpenMovieFile(const FSSpec *fileSpec, short *resRefNum, SInt8 permission)
  3340. ;
  3341.     IF ¬ GENERATINGCFM THEN
  3342.         Macro
  3343.         _OpenMovieFile
  3344.             move.w    #$192,d0
  3345.             dc.w     $AAAA
  3346.         EndM
  3347.     ELSE
  3348.         IMPORT    OpenMovieFile
  3349.     ENDIF
  3350.  
  3351. ;
  3352. ; pascal OSErr CloseMovieFile(short resRefNum)
  3353. ;
  3354.     IF ¬ GENERATINGCFM THEN
  3355.         Macro
  3356.         _CloseMovieFile
  3357.             move.w    #$D5,d0
  3358.             dc.w     $AAAA
  3359.         EndM
  3360.     ELSE
  3361.         IMPORT    CloseMovieFile
  3362.     ENDIF
  3363.  
  3364. ;
  3365. ; pascal OSErr DeleteMovieFile(const FSSpec *fileSpec)
  3366. ;
  3367.     IF ¬ GENERATINGCFM THEN
  3368.         Macro
  3369.         _DeleteMovieFile
  3370.             move.w    #$175,d0
  3371.             dc.w     $AAAA
  3372.         EndM
  3373.     ELSE
  3374.         IMPORT    DeleteMovieFile
  3375.     ENDIF
  3376.  
  3377. ;
  3378. ; pascal OSErr NewMovieFromFile(Movie *theMovie, short resRefNum, short *resId, StringPtr resName, short newMovieFlags, Boolean *dataRefWasChanged)
  3379. ;
  3380.     IF ¬ GENERATINGCFM THEN
  3381.         Macro
  3382.         _NewMovieFromFile
  3383.             move.w    #$F0,d0
  3384.             dc.w     $AAAA
  3385.         EndM
  3386.     ELSE
  3387.         IMPORT    NewMovieFromFile
  3388.     ENDIF
  3389.  
  3390. ;
  3391. ; pascal OSErr NewMovieFromHandle(Movie *theMovie, Handle h, short newMovieFlags, Boolean *dataRefWasChanged)
  3392. ;
  3393.     IF ¬ GENERATINGCFM THEN
  3394.         Macro
  3395.         _NewMovieFromHandle
  3396.             move.w    #$F1,d0
  3397.             dc.w     $AAAA
  3398.         EndM
  3399.     ELSE
  3400.         IMPORT    NewMovieFromHandle
  3401.     ENDIF
  3402.  
  3403. ;
  3404. ; pascal OSErr NewMovieFromDataFork(Movie *theMovie, short fRefNum, long fileOffset, short newMovieFlags, Boolean *dataRefWasChanged)
  3405. ;
  3406.     IF ¬ GENERATINGCFM THEN
  3407.         Macro
  3408.         _NewMovieFromDataFork
  3409.             move.w    #$1B3,d0
  3410.             dc.w     $AAAA
  3411.         EndM
  3412.     ELSE
  3413.         IMPORT    NewMovieFromDataFork
  3414.     ENDIF
  3415.  
  3416. ;
  3417. ; pascal OSErr NewMovieFromUserProc(Movie *m, short flags, Boolean *dataRefWasChanged, GetMovieUPP getProc, void *refCon, Handle defaultDataRef, OSType dataRefType)
  3418. ;
  3419.     IF ¬ GENERATINGCFM THEN
  3420.         Macro
  3421.         _NewMovieFromUserProc
  3422.             move.w    #$1EC,d0
  3423.             dc.w     $AAAA
  3424.         EndM
  3425.     ELSE
  3426.         IMPORT    NewMovieFromUserProc
  3427.     ENDIF
  3428.  
  3429. ;
  3430. ; pascal OSErr NewMovieFromDataRef(Movie *m, short flags, short *id, Handle dataRef, OSType dataRefType)
  3431. ;
  3432.     IF ¬ GENERATINGCFM THEN
  3433.         Macro
  3434.         _NewMovieFromDataRef
  3435.             move.w    #$220,d0
  3436.             dc.w     $AAAA
  3437.         EndM
  3438.     ELSE
  3439.         IMPORT    NewMovieFromDataRef
  3440.     ENDIF
  3441.  
  3442. ;
  3443. ; pascal OSErr AddMovieResource(Movie theMovie, short resRefNum, short *resId, ConstStr255Param resName)
  3444. ;
  3445.     IF ¬ GENERATINGCFM THEN
  3446.         Macro
  3447.         _AddMovieResource
  3448.             move.w    #$D7,d0
  3449.             dc.w     $AAAA
  3450.         EndM
  3451.     ELSE
  3452.         IMPORT    AddMovieResource
  3453.     ENDIF
  3454.  
  3455. ;
  3456. ; pascal OSErr UpdateMovieResource(Movie theMovie, short resRefNum, short resId, ConstStr255Param resName)
  3457. ;
  3458.     IF ¬ GENERATINGCFM THEN
  3459.         Macro
  3460.         _UpdateMovieResource
  3461.             move.w    #$D8,d0
  3462.             dc.w     $AAAA
  3463.         EndM
  3464.     ELSE
  3465.         IMPORT    UpdateMovieResource
  3466.     ENDIF
  3467.  
  3468. ;
  3469. ; pascal OSErr RemoveMovieResource(short resRefNum, short resId)
  3470. ;
  3471.     IF ¬ GENERATINGCFM THEN
  3472.         Macro
  3473.         _RemoveMovieResource
  3474.             move.w    #$176,d0
  3475.             dc.w     $AAAA
  3476.         EndM
  3477.     ELSE
  3478.         IMPORT    RemoveMovieResource
  3479.     ENDIF
  3480.  
  3481. ;
  3482. ; pascal Boolean HasMovieChanged(Movie theMovie)
  3483. ;
  3484.     IF ¬ GENERATINGCFM THEN
  3485.         Macro
  3486.         _HasMovieChanged
  3487.             move.w    #$D9,d0
  3488.             dc.w     $AAAA
  3489.         EndM
  3490.     ELSE
  3491.         IMPORT    HasMovieChanged
  3492.     ENDIF
  3493.  
  3494. ;
  3495. ; pascal void ClearMovieChanged(Movie theMovie)
  3496. ;
  3497.     IF ¬ GENERATINGCFM THEN
  3498.         Macro
  3499.         _ClearMovieChanged
  3500.             move.w    #$113,d0
  3501.             dc.w     $AAAA
  3502.         EndM
  3503.     ELSE
  3504.         IMPORT    ClearMovieChanged
  3505.     ENDIF
  3506.  
  3507. ;
  3508. ; pascal OSErr SetMovieDefaultDataRef(Movie theMovie, Handle dataRef, OSType dataRefType)
  3509. ;
  3510.     IF ¬ GENERATINGCFM THEN
  3511.         Macro
  3512.         _SetMovieDefaultDataRef
  3513.             move.w    #$1C1,d0
  3514.             dc.w     $AAAA
  3515.         EndM
  3516.     ELSE
  3517.         IMPORT    SetMovieDefaultDataRef
  3518.     ENDIF
  3519.  
  3520. ;
  3521. ; pascal OSErr GetMovieDefaultDataRef(Movie theMovie, Handle *dataRef, OSType *dataRefType)
  3522. ;
  3523.     IF ¬ GENERATINGCFM THEN
  3524.         Macro
  3525.         _GetMovieDefaultDataRef
  3526.             move.w    #$1D2,d0
  3527.             dc.w     $AAAA
  3528.         EndM
  3529.     ELSE
  3530.         IMPORT    GetMovieDefaultDataRef
  3531.     ENDIF
  3532.  
  3533. ;
  3534. ; pascal OSErr SetMovieColorTable(Movie theMovie, CTabHandle ctab)
  3535. ;
  3536.     IF ¬ GENERATINGCFM THEN
  3537.         Macro
  3538.         _SetMovieColorTable
  3539.             move.w    #$205,d0
  3540.             dc.w     $AAAA
  3541.         EndM
  3542.     ELSE
  3543.         IMPORT    SetMovieColorTable
  3544.     ENDIF
  3545.  
  3546. ;
  3547. ; pascal OSErr GetMovieColorTable(Movie theMovie, CTabHandle *ctab)
  3548. ;
  3549.     IF ¬ GENERATINGCFM THEN
  3550.         Macro
  3551.         _GetMovieColorTable
  3552.             move.w    #$206,d0
  3553.             dc.w     $AAAA
  3554.         EndM
  3555.     ELSE
  3556.         IMPORT    GetMovieColorTable
  3557.     ENDIF
  3558.  
  3559. ;
  3560. ; pascal void FlattenMovie(Movie theMovie, long movieFlattenFlags, const FSSpec *theFile, OSType creator, ScriptCode scriptTag, long createMovieFileFlags, short *resId, ConstStr255Param resName)
  3561. ;
  3562.     IF ¬ GENERATINGCFM THEN
  3563.         Macro
  3564.         _FlattenMovie
  3565.             move.w    #$19B,d0
  3566.             dc.w     $AAAA
  3567.         EndM
  3568.     ELSE
  3569.         IMPORT    FlattenMovie
  3570.     ENDIF
  3571.  
  3572. ;
  3573. ; pascal Movie FlattenMovieData(Movie theMovie, long movieFlattenFlags, const FSSpec *theFile, OSType creator, ScriptCode scriptTag, long createMovieFileFlags)
  3574. ;
  3575.     IF ¬ GENERATINGCFM THEN
  3576.         Macro
  3577.         _FlattenMovieData
  3578.             move.w    #$19C,d0
  3579.             dc.w     $AAAA
  3580.         EndM
  3581.     ELSE
  3582.         IMPORT    FlattenMovieData
  3583.     ENDIF
  3584.  
  3585. ;
  3586. ; pascal void SetMovieProgressProc(Movie theMovie, MovieProgressUPP p, long refcon)
  3587. ;
  3588.     IF ¬ GENERATINGCFM THEN
  3589.         Macro
  3590.         _SetMovieProgressProc
  3591.             move.w    #$19A,d0
  3592.             dc.w     $AAAA
  3593.         EndM
  3594.     ELSE
  3595.         IMPORT    SetMovieProgressProc
  3596.     ENDIF
  3597.  
  3598. ;************************
  3599. ;* Video Media routines
  3600. ;*************************
  3601. ;
  3602. ; pascal HandlerError GetVideoMediaGraphicsMode(MediaHandler mh, long *graphicsMode, RGBColor *opColor)
  3603. ;
  3604.     IF ¬ GENERATINGCFM THEN
  3605.         Macro
  3606.         _GetVideoMediaGraphicsMode
  3607.             dc.w     $2F3C
  3608.             dc.w     $0008
  3609.             dc.w     $0101
  3610.             moveq    #0,d0
  3611.             dc.w     $A82A
  3612.         EndM
  3613.     ELSE
  3614.         IMPORT    GetVideoMediaGraphicsMode
  3615.     ENDIF
  3616.  
  3617. ;
  3618. ; pascal HandlerError SetVideoMediaGraphicsMode(MediaHandler mh, long graphicsMode, const RGBColor *opColor)
  3619. ;
  3620.     IF ¬ GENERATINGCFM THEN
  3621.         Macro
  3622.         _SetVideoMediaGraphicsMode
  3623.             dc.w     $2F3C
  3624.             dc.w     $0008
  3625.             dc.w     $0102
  3626.             moveq    #0,d0
  3627.             dc.w     $A82A
  3628.         EndM
  3629.     ELSE
  3630.         IMPORT    SetVideoMediaGraphicsMode
  3631.     ENDIF
  3632.  
  3633. ; use these two routines at your own peril
  3634. ;
  3635. ; pascal HandlerError ResetVideoMediaStatistics(MediaHandler mh)
  3636. ;
  3637.     IF ¬ GENERATINGCFM THEN
  3638.         Macro
  3639.         _ResetVideoMediaStatistics
  3640.             dc.w     $2F3C
  3641.             dc.w     $0000
  3642.             dc.w     $0105
  3643.             moveq    #0,d0
  3644.             dc.w     $A82A
  3645.         EndM
  3646.     ELSE
  3647.         IMPORT    ResetVideoMediaStatistics
  3648.     ENDIF
  3649.  
  3650. ;
  3651. ; pascal Fixed GetVideoMediaStatistics(MediaHandler mh)
  3652. ;
  3653.     IF ¬ GENERATINGCFM THEN
  3654.         Macro
  3655.         _GetVideoMediaStatistics
  3656.             dc.w     $2F3C
  3657.             dc.w     $0000
  3658.             dc.w     $0106
  3659.             moveq    #0,d0
  3660.             dc.w     $A82A
  3661.         EndM
  3662.     ELSE
  3663.         IMPORT    GetVideoMediaStatistics
  3664.     ENDIF
  3665.  
  3666. ;************************
  3667. ;* Sound Media routines
  3668. ;*************************
  3669. ;
  3670. ; pascal HandlerError GetSoundMediaBalance(MediaHandler mh, short *balance)
  3671. ;
  3672.     IF ¬ GENERATINGCFM THEN
  3673.         Macro
  3674.         _GetSoundMediaBalance
  3675.             dc.w     $2F3C
  3676.             dc.w     $0004
  3677.             dc.w     $0101
  3678.             moveq    #0,d0
  3679.             dc.w     $A82A
  3680.         EndM
  3681.     ELSE
  3682.         IMPORT    GetSoundMediaBalance
  3683.     ENDIF
  3684.  
  3685. ;
  3686. ; pascal HandlerError SetSoundMediaBalance(MediaHandler mh, short balance)
  3687. ;
  3688.     IF ¬ GENERATINGCFM THEN
  3689.         Macro
  3690.         _SetSoundMediaBalance
  3691.             dc.w     $2F3C
  3692.             dc.w     $0002
  3693.             dc.w     $0102
  3694.             moveq    #0,d0
  3695.             dc.w     $A82A
  3696.         EndM
  3697.     ELSE
  3698.         IMPORT    SetSoundMediaBalance
  3699.     ENDIF
  3700.  
  3701. ;************************
  3702. ;* Sprite Media routines
  3703. ;*************************
  3704. ; flags for HitTestSpriteMedia 
  3705.  
  3706. spriteHitTestBounds                EQU        1 << 0                ;    point must only be within sprite's bounding box
  3707. spriteHitTestImage                EQU        1 << 1                ;  point must be within the shape of the sprite's image
  3708.  
  3709. ; atom types for sprite media 
  3710.     kSpriteAtomType: SET 'sprt'
  3711.     kSpriteImagesContainerAtomType: SET 'imct'
  3712.     kSpriteImageAtomType: SET 'imag'
  3713.     kSpriteImageDataAtomType: SET 'imda'
  3714.     kSpriteSharedDataAtomType: SET 'dflt'
  3715.     kSpriteNameAtomType: SET 'name'
  3716. ;
  3717. ; pascal ComponentResult SetSpriteMediaSpriteProperty(MediaHandler mh, short spriteIndex, long propertyType, void *propertyValue)
  3718. ;
  3719.     IF ¬ GENERATINGCFM THEN
  3720.         Macro
  3721.         _SetSpriteMediaSpriteProperty
  3722.             dc.w     $2F3C
  3723.             dc.w     $000A
  3724.             dc.w     $0101
  3725.             moveq    #0,d0
  3726.             dc.w     $A82A
  3727.         EndM
  3728.     ELSE
  3729.         IMPORT    SetSpriteMediaSpriteProperty
  3730.     ENDIF
  3731.  
  3732. ;
  3733. ; pascal ComponentResult GetSpriteMediaSpriteProperty(MediaHandler mh, short spriteIndex, long propertyType, void *propertyValue)
  3734. ;
  3735.     IF ¬ GENERATINGCFM THEN
  3736.         Macro
  3737.         _GetSpriteMediaSpriteProperty
  3738.             dc.w     $2F3C
  3739.             dc.w     $000A
  3740.             dc.w     $0102
  3741.             moveq    #0,d0
  3742.             dc.w     $A82A
  3743.         EndM
  3744.     ELSE
  3745.         IMPORT    GetSpriteMediaSpriteProperty
  3746.     ENDIF
  3747.  
  3748. ;
  3749. ; pascal ComponentResult HitTestSpriteMedia(MediaHandler mh, long flags, Point loc, short *spriteHitIndex)
  3750. ;
  3751.     IF ¬ GENERATINGCFM THEN
  3752.         Macro
  3753.         _HitTestSpriteMedia
  3754.             dc.w     $2F3C
  3755.             dc.w     $000C
  3756.             dc.w     $0103
  3757.             moveq    #0,d0
  3758.             dc.w     $A82A
  3759.         EndM
  3760.     ELSE
  3761.         IMPORT    HitTestSpriteMedia
  3762.     ENDIF
  3763.  
  3764. ;
  3765. ; pascal ComponentResult CountSpriteMediaSprites(MediaHandler mh, short *numSprites)
  3766. ;
  3767.     IF ¬ GENERATINGCFM THEN
  3768.         Macro
  3769.         _CountSpriteMediaSprites
  3770.             dc.w     $2F3C
  3771.             dc.w     $0004
  3772.             dc.w     $0104
  3773.             moveq    #0,d0
  3774.             dc.w     $A82A
  3775.         EndM
  3776.     ELSE
  3777.         IMPORT    CountSpriteMediaSprites
  3778.     ENDIF
  3779.  
  3780. ;
  3781. ; pascal ComponentResult CountSpriteMediaImages(MediaHandler mh, short *numImages)
  3782. ;
  3783.     IF ¬ GENERATINGCFM THEN
  3784.         Macro
  3785.         _CountSpriteMediaImages
  3786.             dc.w     $2F3C
  3787.             dc.w     $0004
  3788.             dc.w     $0105
  3789.             moveq    #0,d0
  3790.             dc.w     $A82A
  3791.         EndM
  3792.     ELSE
  3793.         IMPORT    CountSpriteMediaImages
  3794.     ENDIF
  3795.  
  3796. ;
  3797. ; pascal ComponentResult GetSpriteMediaIndImageDescription(MediaHandler mh, short imageIndex, ImageDescriptionHandle imageDescription)
  3798. ;
  3799.     IF ¬ GENERATINGCFM THEN
  3800.         Macro
  3801.         _GetSpriteMediaIndImageDescription
  3802.             dc.w     $2F3C
  3803.             dc.w     $0006
  3804.             dc.w     $0106
  3805.             moveq    #0,d0
  3806.             dc.w     $A82A
  3807.         EndM
  3808.     ELSE
  3809.         IMPORT    GetSpriteMediaIndImageDescription
  3810.     ENDIF
  3811.  
  3812. ;
  3813. ; pascal ComponentResult GetDisplayedSampleNumber(MediaHandler mh, long *sampleNum)
  3814. ;
  3815.     IF ¬ GENERATINGCFM THEN
  3816.         Macro
  3817.         _GetDisplayedSampleNumber
  3818.             dc.w     $2F3C
  3819.             dc.w     $0007
  3820.             dc.w     $0107
  3821.             moveq    #0,d0
  3822.             dc.w     $A82A
  3823.         EndM
  3824.     ELSE
  3825.         IMPORT    GetDisplayedSampleNumber
  3826.     ENDIF
  3827.  
  3828. ;************************
  3829. ;* Text Media routines
  3830. ;*************************
  3831. ; Return displayFlags for TextProc 
  3832. txtProcDefaultDisplay            EQU        0                    ;    Use the media's default
  3833. txtProcDontDisplay                EQU        1                    ;    Don't display the text
  3834. txtProcDoDisplay                EQU        2                    ;    Do display the text
  3835.  
  3836. ;
  3837. ; pascal ComponentResult SetTextProc(MediaHandler mh, TextMediaUPP TextProc, long refcon)
  3838. ;
  3839.     IF ¬ GENERATINGCFM THEN
  3840.         Macro
  3841.         _SetTextProc
  3842.             dc.w     $2F3C
  3843.             dc.w     $0008
  3844.             dc.w     $0101
  3845.             moveq    #0,d0
  3846.             dc.w     $A82A
  3847.         EndM
  3848.     ELSE
  3849.         IMPORT    SetTextProc
  3850.     ENDIF
  3851.  
  3852. ;
  3853. ; pascal ComponentResult AddTextSample(MediaHandler mh, Ptr text, unsigned long size, short fontNumber, short fontSize, Style textFace, RGBColor *textColor, RGBColor *backColor, short textJustification, Rect *textBox, long displayFlags, TimeValue scrollDelay, short hiliteStart, short hiliteEnd, RGBColor *rgbHiliteColor, TimeValue duration, TimeValue *sampleTime)
  3854. ;
  3855.     IF ¬ GENERATINGCFM THEN
  3856.         Macro
  3857.         _AddTextSample
  3858.             dc.w     $2F3C
  3859.             dc.w     $0034
  3860.             dc.w     $0102
  3861.             moveq    #0,d0
  3862.             dc.w     $A82A
  3863.         EndM
  3864.     ELSE
  3865.         IMPORT    AddTextSample
  3866.     ENDIF
  3867.  
  3868. ;
  3869. ; pascal ComponentResult AddTESample(MediaHandler mh, TEHandle hTE, RGBColor *backColor, short textJustification, Rect *textBox, long displayFlags, TimeValue scrollDelay, short hiliteStart, short hiliteEnd, RGBColor *rgbHiliteColor, TimeValue duration, TimeValue *sampleTime)
  3870. ;
  3871.     IF ¬ GENERATINGCFM THEN
  3872.         Macro
  3873.         _AddTESample
  3874.             dc.w     $2F3C
  3875.             dc.w     $0026
  3876.             dc.w     $0103
  3877.             moveq    #0,d0
  3878.             dc.w     $A82A
  3879.         EndM
  3880.     ELSE
  3881.         IMPORT    AddTESample
  3882.     ENDIF
  3883.  
  3884. ;
  3885. ; pascal ComponentResult AddHiliteSample(MediaHandler mh, short hiliteStart, short hiliteEnd, RGBColor *rgbHiliteColor, TimeValue duration, TimeValue *sampleTime)
  3886. ;
  3887.     IF ¬ GENERATINGCFM THEN
  3888.         Macro
  3889.         _AddHiliteSample
  3890.             dc.w     $2F3C
  3891.             dc.w     $0010
  3892.             dc.w     $0104
  3893.             moveq    #0,d0
  3894.             dc.w     $A82A
  3895.         EndM
  3896.     ELSE
  3897.         IMPORT    AddHiliteSample
  3898.     ENDIF
  3899.  
  3900. findTextEdgeOK                    EQU        1 << 0                ; Okay to find text at specified sample time
  3901. findTextCaseSensitive            EQU        1 << 1                ; Case sensitive search
  3902. findTextReverseSearch            EQU        1 << 2                ; Search from sampleTime backwards
  3903. findTextWrapAround                EQU        1 << 3                ; Wrap search when beginning or end of movie is hit
  3904. findTextUseOffset                EQU        1 << 4                ; Begin search at the given character offset into sample rather than edge
  3905.  
  3906. ;
  3907. ; pascal ComponentResult FindNextText(MediaHandler mh, Ptr text, long size, short findFlags, TimeValue startTime, TimeValue *foundTime, TimeValue *foundDuration, long *offset)
  3908. ;
  3909.     IF ¬ GENERATINGCFM THEN
  3910.         Macro
  3911.         _FindNextText
  3912.             dc.w     $2F3C
  3913.             dc.w     $001A
  3914.             dc.w     $0105
  3915.             moveq    #0,d0
  3916.             dc.w     $A82A
  3917.         EndM
  3918.     ELSE
  3919.         IMPORT    FindNextText
  3920.     ENDIF
  3921.  
  3922. ;
  3923. ; pascal ComponentResult HiliteTextSample(MediaHandler mh, TimeValue sampleTime, short hiliteStart, short hiliteEnd, RGBColor *rgbHiliteColor)
  3924. ;
  3925.     IF ¬ GENERATINGCFM THEN
  3926.         Macro
  3927.         _HiliteTextSample
  3928.             dc.w     $2F3C
  3929.             dc.w     $000C
  3930.             dc.w     $0106
  3931.             moveq    #0,d0
  3932.             dc.w     $A82A
  3933.         EndM
  3934.     ELSE
  3935.         IMPORT    HiliteTextSample
  3936.     ENDIF
  3937.  
  3938. dropShadowOffsetType            EQU        'drpo'
  3939. dropShadowTranslucencyType        EQU        'drpt'
  3940.  
  3941. ;
  3942. ; pascal ComponentResult SetTextSampleData(MediaHandler mh, void *data, OSType dataType)
  3943. ;
  3944.     IF ¬ GENERATINGCFM THEN
  3945.         Macro
  3946.         _SetTextSampleData
  3947.             dc.w     $2F3C
  3948.             dc.w     $0008
  3949.             dc.w     $0107
  3950.             moveq    #0,d0
  3951.             dc.w     $A82A
  3952.         EndM
  3953.     ELSE
  3954.         IMPORT    SetTextSampleData
  3955.     ENDIF
  3956.  
  3957. ;
  3958. ; pascal OSErr MovieSearchText(Movie theMovie, Ptr text, long size, long searchFlags, Track *searchTrack, TimeValue *searchTime, long *searchOffset)
  3959. ;
  3960.     IF ¬ GENERATINGCFM THEN
  3961.         Macro
  3962.         _MovieSearchText
  3963.             move.w    #$207,d0
  3964.             dc.w     $AAAA
  3965.         EndM
  3966.     ELSE
  3967.         IMPORT    MovieSearchText
  3968.     ENDIF
  3969.  
  3970. ;
  3971. ; pascal void GetPosterBox(Movie theMovie, Rect *boxRect)
  3972. ;
  3973.     IF ¬ GENERATINGCFM THEN
  3974.         Macro
  3975.         _GetPosterBox
  3976.             move.w    #$16F,d0
  3977.             dc.w     $AAAA
  3978.         EndM
  3979.     ELSE
  3980.         IMPORT    GetPosterBox
  3981.     ENDIF
  3982.  
  3983. ;
  3984. ; pascal void SetPosterBox(Movie theMovie, const Rect *boxRect)
  3985. ;
  3986.     IF ¬ GENERATINGCFM THEN
  3987.         Macro
  3988.         _SetPosterBox
  3989.             move.w    #$170,d0
  3990.             dc.w     $AAAA
  3991.         EndM
  3992.     ELSE
  3993.         IMPORT    SetPosterBox
  3994.     ENDIF
  3995.  
  3996. ;
  3997. ; pascal RgnHandle GetMovieSegmentDisplayBoundsRgn(Movie theMovie, TimeValue time, TimeValue duration)
  3998. ;
  3999.     IF ¬ GENERATINGCFM THEN
  4000.         Macro
  4001.         _GetMovieSegmentDisplayBoundsRgn
  4002.             move.w    #$16C,d0
  4003.             dc.w     $AAAA
  4004.         EndM
  4005.     ELSE
  4006.         IMPORT    GetMovieSegmentDisplayBoundsRgn
  4007.     ENDIF
  4008.  
  4009. ;
  4010. ; pascal RgnHandle GetTrackSegmentDisplayBoundsRgn(Track theTrack, TimeValue time, TimeValue duration)
  4011. ;
  4012.     IF ¬ GENERATINGCFM THEN
  4013.         Macro
  4014.         _GetTrackSegmentDisplayBoundsRgn
  4015.             move.w    #$16B,d0
  4016.             dc.w     $AAAA
  4017.         EndM
  4018.     ELSE
  4019.         IMPORT    GetTrackSegmentDisplayBoundsRgn
  4020.     ENDIF
  4021.  
  4022. ;
  4023. ; pascal void SetMovieCoverProcs(Movie theMovie, MovieRgnCoverUPP uncoverProc, MovieRgnCoverUPP coverProc, long refcon)
  4024. ;
  4025.     IF ¬ GENERATINGCFM THEN
  4026.         Macro
  4027.         _SetMovieCoverProcs
  4028.             move.w    #$179,d0
  4029.             dc.w     $AAAA
  4030.         EndM
  4031.     ELSE
  4032.         IMPORT    SetMovieCoverProcs
  4033.     ENDIF
  4034.  
  4035. ;
  4036. ; pascal OSErr GetMovieCoverProcs(Movie theMovie, MovieRgnCoverUPP *uncoverProc, MovieRgnCoverUPP *coverProc, long *refcon)
  4037. ;
  4038.     IF ¬ GENERATINGCFM THEN
  4039.         Macro
  4040.         _GetMovieCoverProcs
  4041.             move.w    #$1DD,d0
  4042.             dc.w     $AAAA
  4043.         EndM
  4044.     ELSE
  4045.         IMPORT    GetMovieCoverProcs
  4046.     ENDIF
  4047.  
  4048. ;
  4049. ; pascal ComponentResult GetTrackStatus(Track theTrack)
  4050. ;
  4051.     IF ¬ GENERATINGCFM THEN
  4052.         Macro
  4053.         _GetTrackStatus
  4054.             move.w    #$172,d0
  4055.             dc.w     $AAAA
  4056.         EndM
  4057.     ELSE
  4058.         IMPORT    GetTrackStatus
  4059.     ENDIF
  4060.  
  4061. ;
  4062. ; pascal ComponentResult GetMovieStatus(Movie theMovie, Track *firstProblemTrack)
  4063. ;
  4064.     IF ¬ GENERATINGCFM THEN
  4065.         Macro
  4066.         _GetMovieStatus
  4067.             move.w    #$173,d0
  4068.             dc.w     $AAAA
  4069.         EndM
  4070.     ELSE
  4071.         IMPORT    GetMovieStatus
  4072.     ENDIF
  4073.  
  4074. ;***
  4075. ;    Movie Controller support routines
  4076. ;***
  4077. ;
  4078. ; pascal ComponentInstance NewMovieController(Movie theMovie, const Rect *movieRect, long someFlags)
  4079. ;
  4080.     IF ¬ GENERATINGCFM THEN
  4081.         Macro
  4082.         _NewMovieController
  4083.             move.w    #$18A,d0
  4084.             dc.w     $AAAA
  4085.         EndM
  4086.     ELSE
  4087.         IMPORT    NewMovieController
  4088.     ENDIF
  4089.  
  4090. ;
  4091. ; pascal void DisposeMovieController(ComponentInstance mc)
  4092. ;
  4093.     IF ¬ GENERATINGCFM THEN
  4094.         Macro
  4095.         _DisposeMovieController
  4096.             move.w    #$18B,d0
  4097.             dc.w     $AAAA
  4098.         EndM
  4099.     ELSE
  4100.         IMPORT    DisposeMovieController
  4101.     ENDIF
  4102.  
  4103. ;
  4104. ; pascal void ShowMovieInformation(Movie theMovie, ModalFilterUPP filterProc, long refCon)
  4105. ;
  4106.     IF ¬ GENERATINGCFM THEN
  4107.         Macro
  4108.         _ShowMovieInformation
  4109.             move.w    #$209,d0
  4110.             dc.w     $AAAA
  4111.         EndM
  4112.     ELSE
  4113.         IMPORT    ShowMovieInformation
  4114.     ENDIF
  4115.  
  4116. ;****
  4117. ;    Scrap routines
  4118. ;****
  4119. ;
  4120. ; pascal OSErr PutMovieOnScrap(Movie theMovie, long movieScrapFlags)
  4121. ;
  4122.     IF ¬ GENERATINGCFM THEN
  4123.         Macro
  4124.         _PutMovieOnScrap
  4125.             move.w    #$18C,d0
  4126.             dc.w     $AAAA
  4127.         EndM
  4128.     ELSE
  4129.         IMPORT    PutMovieOnScrap
  4130.     ENDIF
  4131.  
  4132. ;
  4133. ; pascal Movie NewMovieFromScrap(long newMovieFlags)
  4134. ;
  4135.     IF ¬ GENERATINGCFM THEN
  4136.         Macro
  4137.         _NewMovieFromScrap
  4138.             move.w    #$18D,d0
  4139.             dc.w     $AAAA
  4140.         EndM
  4141.     ELSE
  4142.         IMPORT    NewMovieFromScrap
  4143.     ENDIF
  4144.  
  4145. ;****
  4146. ;    DataRef routines
  4147. ;****
  4148. ;
  4149. ; pascal OSErr GetMediaDataRef(Media theMedia, short index, Handle *dataRef, OSType *dataRefType, long *dataRefAttributes)
  4150. ;
  4151.     IF ¬ GENERATINGCFM THEN
  4152.         Macro
  4153.         _GetMediaDataRef
  4154.             move.w    #$197,d0
  4155.             dc.w     $AAAA
  4156.         EndM
  4157.     ELSE
  4158.         IMPORT    GetMediaDataRef
  4159.     ENDIF
  4160.  
  4161. ;
  4162. ; pascal OSErr SetMediaDataRef(Media theMedia, short index, Handle dataRef, OSType dataRefType)
  4163. ;
  4164.     IF ¬ GENERATINGCFM THEN
  4165.         Macro
  4166.         _SetMediaDataRef
  4167.             move.w    #$1C9,d0
  4168.             dc.w     $AAAA
  4169.         EndM
  4170.     ELSE
  4171.         IMPORT    SetMediaDataRef
  4172.     ENDIF
  4173.  
  4174. ;
  4175. ; pascal OSErr SetMediaDataRefAttributes(Media theMedia, short index, long dataRefAttributes)
  4176. ;
  4177.     IF ¬ GENERATINGCFM THEN
  4178.         Macro
  4179.         _SetMediaDataRefAttributes
  4180.             move.w    #$1CA,d0
  4181.             dc.w     $AAAA
  4182.         EndM
  4183.     ELSE
  4184.         IMPORT    SetMediaDataRefAttributes
  4185.     ENDIF
  4186.  
  4187. ;
  4188. ; pascal OSErr AddMediaDataRef(Media theMedia, short *index, Handle dataRef, OSType dataRefType)
  4189. ;
  4190.     IF ¬ GENERATINGCFM THEN
  4191.         Macro
  4192.         _AddMediaDataRef
  4193.             move.w    #$198,d0
  4194.             dc.w     $AAAA
  4195.         EndM
  4196.     ELSE
  4197.         IMPORT    AddMediaDataRef
  4198.     ENDIF
  4199.  
  4200. ;
  4201. ; pascal OSErr GetMediaDataRefCount(Media theMedia, short *count)
  4202. ;
  4203.     IF ¬ GENERATINGCFM THEN
  4204.         Macro
  4205.         _GetMediaDataRefCount
  4206.             move.w    #$199,d0
  4207.             dc.w     $AAAA
  4208.         EndM
  4209.     ELSE
  4210.         IMPORT    GetMediaDataRefCount
  4211.     ENDIF
  4212.  
  4213. ;****
  4214. ;    Playback hint routines
  4215. ;****
  4216. ;
  4217. ; pascal void SetMoviePlayHints(Movie theMovie, long flags, long flagsMask)
  4218. ;
  4219.     IF ¬ GENERATINGCFM THEN
  4220.         Macro
  4221.         _SetMoviePlayHints
  4222.             move.w    #$1A1,d0
  4223.             dc.w     $AAAA
  4224.         EndM
  4225.     ELSE
  4226.         IMPORT    SetMoviePlayHints
  4227.     ENDIF
  4228.  
  4229. ;
  4230. ; pascal void SetMediaPlayHints(Media theMedia, long flags, long flagsMask)
  4231. ;
  4232.     IF ¬ GENERATINGCFM THEN
  4233.         Macro
  4234.         _SetMediaPlayHints
  4235.             move.w    #$1A2,d0
  4236.             dc.w     $AAAA
  4237.         EndM
  4238.     ELSE
  4239.         IMPORT    SetMediaPlayHints
  4240.     ENDIF
  4241.  
  4242. ;****
  4243. ;    Load time track hints
  4244. ;****
  4245. preloadAlways                    EQU        1 << 0
  4246. preloadOnlyIfEnabled            EQU        1 << 1
  4247.  
  4248. ;
  4249. ; pascal void SetTrackLoadSettings(Track theTrack, TimeValue preloadTime, TimeValue preloadDuration, long preloadFlags, long defaultHints)
  4250. ;
  4251.     IF ¬ GENERATINGCFM THEN
  4252.         Macro
  4253.         _SetTrackLoadSettings
  4254.             move.w    #$1E3,d0
  4255.             dc.w     $AAAA
  4256.         EndM
  4257.     ELSE
  4258.         IMPORT    SetTrackLoadSettings
  4259.     ENDIF
  4260.  
  4261. ;
  4262. ; pascal void GetTrackLoadSettings(Track theTrack, TimeValue *preloadTime, TimeValue *preloadDuration, long *preloadFlags, long *defaultHints)
  4263. ;
  4264.     IF ¬ GENERATINGCFM THEN
  4265.         Macro
  4266.         _GetTrackLoadSettings
  4267.             move.w    #$1E4,d0
  4268.             dc.w     $AAAA
  4269.         EndM
  4270.     ELSE
  4271.         IMPORT    GetTrackLoadSettings
  4272.     ENDIF
  4273.  
  4274. ;****
  4275. ;    Big screen TV
  4276. ;****
  4277. fullScreenHideCursor            EQU        1 << 0
  4278. fullScreenAllowEvents            EQU        1 << 1
  4279. fullScreenDontChangeMenuBar        EQU        1 << 2
  4280. fullScreenPreflightSize            EQU        1 << 3
  4281.  
  4282. ;
  4283. ; pascal OSErr BeginFullScreen(Ptr *restoreState, GDHandle whichGD, short *desiredWidth, short *desiredHeight, WindowPtr *newWindow, RGBColor *eraseColor, long flags)
  4284. ;
  4285.     IF ¬ GENERATINGCFM THEN
  4286.         Macro
  4287.         _BeginFullScreen
  4288.             move.w    #$233,d0
  4289.             dc.w     $AAAA
  4290.         EndM
  4291.     ELSE
  4292.         IMPORT    BeginFullScreen
  4293.     ENDIF
  4294.  
  4295. ;
  4296. ; pascal OSErr EndFullScreen(Ptr fullState, long flags)
  4297. ;
  4298.     IF ¬ GENERATINGCFM THEN
  4299.         Macro
  4300.         _EndFullScreen
  4301.             move.w    #$234,d0
  4302.             dc.w     $AAAA
  4303.         EndM
  4304.     ELSE
  4305.         IMPORT    EndFullScreen
  4306.     ENDIF
  4307.  
  4308. ;****
  4309. ;    Sprite Toolbox
  4310. ;****
  4311.     kBackgroundSpriteLayerNum: SET (32767)
  4312. kSpritePropertyMatrix            EQU        1
  4313. kSpritePropertyImageDescription    EQU        2
  4314. kSpritePropertyImageDataPtr        EQU        3
  4315. kSpritePropertyVisible            EQU        4
  4316. kSpritePropertyLayer            EQU        5
  4317. kSpritePropertyImageIndex        EQU        100
  4318. kSpriteTrackPropertyBackgroundColor EQU        101
  4319. kSpriteTrackPropertyOffscreenBitDepth EQU        102
  4320. kSpriteTrackPropertySampleFormat EQU        103
  4321.  
  4322. ; flagsIn for SpriteWorldIdle
  4323. kOnlyDrawToSpriteWorld            EQU        1 << 0
  4324.  
  4325. ; flagsOut for SpriteWorldIdle
  4326. kSpriteWorldDidDraw                EQU        1 << 0
  4327.  
  4328. ; flags for sprite track sample format
  4329. kKeyFrameAndSingleOverride        EQU        1 << 1
  4330. kKeyFrameAndAllOverrides        EQU        1 << 2
  4331.  
  4332. ;
  4333. ; pascal OSErr NewSpriteWorld(SpriteWorld *newSpriteWorld, GWorldPtr destination, GWorldPtr spriteLayer, RGBColor *backgroundColor, GWorldPtr background)
  4334. ;
  4335.     IF ¬ GENERATINGCFM THEN
  4336.         Macro
  4337.         _NewSpriteWorld
  4338.             move.w    #$239,d0
  4339.             dc.w     $AAAA
  4340.         EndM
  4341.     ELSE
  4342.         IMPORT    NewSpriteWorld
  4343.     ENDIF
  4344.  
  4345. ;
  4346. ; pascal void DisposeSpriteWorld(SpriteWorld theSpriteWorld)
  4347. ;
  4348.     IF ¬ GENERATINGCFM THEN
  4349.         Macro
  4350.         _DisposeSpriteWorld
  4351.             move.w    #$23A,d0
  4352.             dc.w     $AAAA
  4353.         EndM
  4354.     ELSE
  4355.         IMPORT    DisposeSpriteWorld
  4356.     ENDIF
  4357.  
  4358. ;
  4359. ; pascal OSErr SetSpriteWorldClip(SpriteWorld theSpriteWorld, RgnHandle clipRgn)
  4360. ;
  4361.     IF ¬ GENERATINGCFM THEN
  4362.         Macro
  4363.         _SetSpriteWorldClip
  4364.             move.w    #$23B,d0
  4365.             dc.w     $AAAA
  4366.         EndM
  4367.     ELSE
  4368.         IMPORT    SetSpriteWorldClip
  4369.     ENDIF
  4370.  
  4371. ;
  4372. ; pascal OSErr SetSpriteWorldMatrix(SpriteWorld theSpriteWorld, const MatrixRecord *matrix)
  4373. ;
  4374.     IF ¬ GENERATINGCFM THEN
  4375.         Macro
  4376.         _SetSpriteWorldMatrix
  4377.             move.w    #$23C,d0
  4378.             dc.w     $AAAA
  4379.         EndM
  4380.     ELSE
  4381.         IMPORT    SetSpriteWorldMatrix
  4382.     ENDIF
  4383.  
  4384. ;
  4385. ; pascal OSErr SpriteWorldIdle(SpriteWorld theSpriteWorld, long flagsIn, long *flagsOut)
  4386. ;
  4387.     IF ¬ GENERATINGCFM THEN
  4388.         Macro
  4389.         _SpriteWorldIdle
  4390.             move.w    #$23D,d0
  4391.             dc.w     $AAAA
  4392.         EndM
  4393.     ELSE
  4394.         IMPORT    SpriteWorldIdle
  4395.     ENDIF
  4396.  
  4397. ;
  4398. ; pascal OSErr InvalidateSpriteWorld(SpriteWorld theSpriteWorld, Rect *invalidArea)
  4399. ;
  4400.     IF ¬ GENERATINGCFM THEN
  4401.         Macro
  4402.         _InvalidateSpriteWorld
  4403.             move.w    #$23E,d0
  4404.             dc.w     $AAAA
  4405.         EndM
  4406.     ELSE
  4407.         IMPORT    InvalidateSpriteWorld
  4408.     ENDIF
  4409.  
  4410. ;
  4411. ; pascal OSErr SpriteWorldHitTest(SpriteWorld theSpriteWorld, long flags, Point loc, Sprite *spriteHit)
  4412. ;
  4413.     IF ¬ GENERATINGCFM THEN
  4414.         Macro
  4415.         _SpriteWorldHitTest
  4416.             move.w    #$246,d0
  4417.             dc.w     $AAAA
  4418.         EndM
  4419.     ELSE
  4420.         IMPORT    SpriteWorldHitTest
  4421.     ENDIF
  4422.  
  4423. ;
  4424. ; pascal OSErr SpriteHitTest(Sprite theSprite, long flags, Point loc, Boolean *wasHit)
  4425. ;
  4426.     IF ¬ GENERATINGCFM THEN
  4427.         Macro
  4428.         _SpriteHitTest
  4429.             move.w    #$247,d0
  4430.             dc.w     $AAAA
  4431.         EndM
  4432.     ELSE
  4433.         IMPORT    SpriteHitTest
  4434.     ENDIF
  4435.  
  4436. ;
  4437. ; pascal void DisposeAllSprites(SpriteWorld theSpriteWorld)
  4438. ;
  4439.     IF ¬ GENERATINGCFM THEN
  4440.         Macro
  4441.         _DisposeAllSprites
  4442.             move.w    #$23F,d0
  4443.             dc.w     $AAAA
  4444.         EndM
  4445.     ELSE
  4446.         IMPORT    DisposeAllSprites
  4447.     ENDIF
  4448.  
  4449. ;
  4450. ; pascal OSErr NewSprite(Sprite *newSprite, SpriteWorld itsSpriteWorld, ImageDescriptionHandle idh, Ptr imageDataPtr, MatrixRecord *matrix, Boolean visible, short layer)
  4451. ;
  4452.     IF ¬ GENERATINGCFM THEN
  4453.         Macro
  4454.         _NewSprite
  4455.             move.w    #$240,d0
  4456.             dc.w     $AAAA
  4457.         EndM
  4458.     ELSE
  4459.         IMPORT    NewSprite
  4460.     ENDIF
  4461.  
  4462. ;
  4463. ; pascal void DisposeSprite(Sprite theSprite)
  4464. ;
  4465.     IF ¬ GENERATINGCFM THEN
  4466.         Macro
  4467.         _DisposeSprite
  4468.             move.w    #$241,d0
  4469.             dc.w     $AAAA
  4470.         EndM
  4471.     ELSE
  4472.         IMPORT    DisposeSprite
  4473.     ENDIF
  4474.  
  4475. ;
  4476. ; pascal void InvalidateSprite(Sprite theSprite)
  4477. ;
  4478.     IF ¬ GENERATINGCFM THEN
  4479.         Macro
  4480.         _InvalidateSprite
  4481.             move.w    #$242,d0
  4482.             dc.w     $AAAA
  4483.         EndM
  4484.     ELSE
  4485.         IMPORT    InvalidateSprite
  4486.     ENDIF
  4487.  
  4488. ;
  4489. ; pascal OSErr SetSpriteProperty(Sprite theSprite, long propertyType, void *propertyValue)
  4490. ;
  4491.     IF ¬ GENERATINGCFM THEN
  4492.         Macro
  4493.         _SetSpriteProperty
  4494.             move.w    #$243,d0
  4495.             dc.w     $AAAA
  4496.         EndM
  4497.     ELSE
  4498.         IMPORT    SetSpriteProperty
  4499.     ENDIF
  4500.  
  4501. ;
  4502. ; pascal OSErr GetSpriteProperty(Sprite theSprite, long propertyType, void *propertyValue)
  4503. ;
  4504.     IF ¬ GENERATINGCFM THEN
  4505.         Macro
  4506.         _GetSpriteProperty
  4507.             move.w    #$244,d0
  4508.             dc.w     $AAAA
  4509.         EndM
  4510.     ELSE
  4511.         IMPORT    GetSpriteProperty
  4512.     ENDIF
  4513.  
  4514. ;****
  4515. ;    QT Atom Data Support
  4516. ;****
  4517. kParentAtomIsContainer            EQU        0
  4518.  
  4519. ; create and dispose QTAtomContainer objects
  4520. ;
  4521. ; pascal OSErr QTNewAtomContainer(QTAtomContainer *atomData)
  4522. ;
  4523.     IF ¬ GENERATINGCFM THEN
  4524.         Macro
  4525.         _QTNewAtomContainer
  4526.             move.w    #$20C,d0
  4527.             dc.w     $AAAA
  4528.         EndM
  4529.     ELSE
  4530.         IMPORT    QTNewAtomContainer
  4531.     ENDIF
  4532.  
  4533. ;
  4534. ; pascal OSErr QTDisposeAtomContainer(QTAtomContainer atomData)
  4535. ;
  4536.     IF ¬ GENERATINGCFM THEN
  4537.         Macro
  4538.         _QTDisposeAtomContainer
  4539.             move.w    #$20D,d0
  4540.             dc.w     $AAAA
  4541.         EndM
  4542.     ELSE
  4543.         IMPORT    QTDisposeAtomContainer
  4544.     ENDIF
  4545.  
  4546. ; locating nested atoms within QTAtomContainer container
  4547. ;
  4548. ; pascal QTAtomType QTGetNextChildType(QTAtomContainer container, QTAtom parentAtom, QTAtomType currentChildType)
  4549. ;
  4550.     IF ¬ GENERATINGCFM THEN
  4551.         Macro
  4552.         _QTGetNextChildType
  4553.             move.w    #$20E,d0
  4554.             dc.w     $AAAA
  4555.         EndM
  4556.     ELSE
  4557.         IMPORT    QTGetNextChildType
  4558.     ENDIF
  4559.  
  4560. ;
  4561. ; pascal short QTCountChildrenOfType(QTAtomContainer container, QTAtom parentAtom, QTAtomType childType)
  4562. ;
  4563.     IF ¬ GENERATINGCFM THEN
  4564.         Macro
  4565.         _QTCountChildrenOfType
  4566.             move.w    #$20F,d0
  4567.             dc.w     $AAAA
  4568.         EndM
  4569.     ELSE
  4570.         IMPORT    QTCountChildrenOfType
  4571.     ENDIF
  4572.  
  4573. ;
  4574. ; pascal QTAtom QTFindChildByIndex(QTAtomContainer container, QTAtom parentAtom, QTAtomType atomType, short index, QTAtomID *id)
  4575. ;
  4576.     IF ¬ GENERATINGCFM THEN
  4577.         Macro
  4578.         _QTFindChildByIndex
  4579.             move.w    #$210,d0
  4580.             dc.w     $AAAA
  4581.         EndM
  4582.     ELSE
  4583.         IMPORT    QTFindChildByIndex
  4584.     ENDIF
  4585.  
  4586. ;
  4587. ; pascal QTAtom QTFindChildByID(QTAtomContainer container, QTAtom parentAtom, QTAtomType atomType, QTAtomID id, short *index)
  4588. ;
  4589.     IF ¬ GENERATINGCFM THEN
  4590.         Macro
  4591.         _QTFindChildByID
  4592.             move.w    #$21D,d0
  4593.             dc.w     $AAAA
  4594.         EndM
  4595.     ELSE
  4596.         IMPORT    QTFindChildByID
  4597.     ENDIF
  4598.  
  4599. ;
  4600. ; pascal OSErr QTNextChildAnyType(QTAtomContainer container, QTAtom parentAtom, QTAtom currentChild, QTAtom *nextChild)
  4601. ;
  4602.     IF ¬ GENERATINGCFM THEN
  4603.         Macro
  4604.         _QTNextChildAnyType
  4605.             move.w    #$200,d0
  4606.             dc.w     $AAAA
  4607.         EndM
  4608.     ELSE
  4609.         IMPORT    QTNextChildAnyType
  4610.     ENDIF
  4611.  
  4612. ; set a leaf atom's data
  4613. ;
  4614. ; pascal OSErr QTSetAtomData(QTAtomContainer container, QTAtom atom, long dataSize, void *atomData)
  4615. ;
  4616.     IF ¬ GENERATINGCFM THEN
  4617.         Macro
  4618.         _QTSetAtomData
  4619.             move.w    #$211,d0
  4620.             dc.w     $AAAA
  4621.         EndM
  4622.     ELSE
  4623.         IMPORT    QTSetAtomData
  4624.     ENDIF
  4625.  
  4626. ; extracting data
  4627. ;
  4628. ; pascal OSErr QTCopyAtomDataToHandle(QTAtomContainer container, QTAtom atom, Handle targetHandle)
  4629. ;
  4630.     IF ¬ GENERATINGCFM THEN
  4631.         Macro
  4632.         _QTCopyAtomDataToHandle
  4633.             move.w    #$212,d0
  4634.             dc.w     $AAAA
  4635.         EndM
  4636.     ELSE
  4637.         IMPORT    QTCopyAtomDataToHandle
  4638.     ENDIF
  4639.  
  4640. ;
  4641. ; pascal OSErr QTCopyAtomDataToPtr(QTAtomContainer container, QTAtom atom, Boolean sizeOrLessOK, long size, void *targetPtr, long *actualSize)
  4642. ;
  4643.     IF ¬ GENERATINGCFM THEN
  4644.         Macro
  4645.         _QTCopyAtomDataToPtr
  4646.             move.w    #$213,d0
  4647.             dc.w     $AAAA
  4648.         EndM
  4649.     ELSE
  4650.         IMPORT    QTCopyAtomDataToPtr
  4651.     ENDIF
  4652.  
  4653. ;
  4654. ; pascal OSErr QTGetAtomTypeAndID(QTAtomContainer container, QTAtom atom, QTAtomType *type, QTAtomID *id)
  4655. ;
  4656.     IF ¬ GENERATINGCFM THEN
  4657.         Macro
  4658.         _QTGetAtomTypeAndID
  4659.             move.w    #$232,d0
  4660.             dc.w     $AAAA
  4661.         EndM
  4662.     ELSE
  4663.         IMPORT    QTGetAtomTypeAndID
  4664.     ENDIF
  4665.  
  4666. ; extract a copy of an atom and all of it's children, caller disposes
  4667. ;
  4668. ; pascal OSErr QTCopyAtom(QTAtomContainer container, QTAtom atom, QTAtomContainer *targetContainer)
  4669. ;
  4670.     IF ¬ GENERATINGCFM THEN
  4671.         Macro
  4672.         _QTCopyAtom
  4673.             move.w    #$214,d0
  4674.             dc.w     $AAAA
  4675.         EndM
  4676.     ELSE
  4677.         IMPORT    QTCopyAtom
  4678.     ENDIF
  4679.  
  4680. ; obtaining direct reference to atom data
  4681. ;
  4682. ; pascal OSErr QTLockContainer(QTAtomContainer container)
  4683. ;
  4684.     IF ¬ GENERATINGCFM THEN
  4685.         Macro
  4686.         _QTLockContainer
  4687.             move.w    #$215,d0
  4688.             dc.w     $AAAA
  4689.         EndM
  4690.     ELSE
  4691.         IMPORT    QTLockContainer
  4692.     ENDIF
  4693.  
  4694. ;
  4695. ; pascal OSErr QTGetAtomDataPtr(QTAtomContainer container, QTAtom atom, long *dataSize, Ptr *atomData)
  4696. ;
  4697.     IF ¬ GENERATINGCFM THEN
  4698.         Macro
  4699.         _QTGetAtomDataPtr
  4700.             move.w    #$216,d0
  4701.             dc.w     $AAAA
  4702.         EndM
  4703.     ELSE
  4704.         IMPORT    QTGetAtomDataPtr
  4705.     ENDIF
  4706.  
  4707. ;
  4708. ; pascal OSErr QTUnlockContainer(QTAtomContainer container)
  4709. ;
  4710.     IF ¬ GENERATINGCFM THEN
  4711.         Macro
  4712.         _QTUnlockContainer
  4713.             move.w    #$217,d0
  4714.             dc.w     $AAAA
  4715.         EndM
  4716.     ELSE
  4717.         IMPORT    QTUnlockContainer
  4718.     ENDIF
  4719.  
  4720. ; building QTAtomContainer trees
  4721. ; creates and inserts new atom at specified index, existing atoms at or after index are moved toward end of list
  4722. ; used for Top-Down tree creation
  4723. ;
  4724. ; pascal OSErr QTInsertChild(QTAtomContainer container, QTAtom parentAtom, QTAtomType type, QTAtomID id, short index, long dataSize, void *data, QTAtom *newAtom)
  4725. ;
  4726.     IF ¬ GENERATINGCFM THEN
  4727.         Macro
  4728.         _QTInsertChild
  4729.             move.w    #$218,d0
  4730.             dc.w     $AAAA
  4731.         EndM
  4732.     ELSE
  4733.         IMPORT    QTInsertChild
  4734.     ENDIF
  4735.  
  4736. ; inserts children from childrenContainer as children of parentAtom
  4737. ;
  4738. ; pascal OSErr QTInsertChildren(QTAtomContainer container, QTAtom parentAtom, QTAtomContainer childrenContainer)
  4739. ;
  4740.     IF ¬ GENERATINGCFM THEN
  4741.         Macro
  4742.         _QTInsertChildren
  4743.             move.w    #$219,d0
  4744.             dc.w     $AAAA
  4745.         EndM
  4746.     ELSE
  4747.         IMPORT    QTInsertChildren
  4748.     ENDIF
  4749.  
  4750. ; destruction
  4751. ;
  4752. ; pascal OSErr QTRemoveAtom(QTAtomContainer container, QTAtom atom)
  4753. ;
  4754.     IF ¬ GENERATINGCFM THEN
  4755.         Macro
  4756.         _QTRemoveAtom
  4757.             move.w    #$21A,d0
  4758.             dc.w     $AAAA
  4759.         EndM
  4760.     ELSE
  4761.         IMPORT    QTRemoveAtom
  4762.     ENDIF
  4763.  
  4764. ;
  4765. ; pascal OSErr QTRemoveChildren(QTAtomContainer container, QTAtom atom)
  4766. ;
  4767.     IF ¬ GENERATINGCFM THEN
  4768.         Macro
  4769.         _QTRemoveChildren
  4770.             move.w    #$21B,d0
  4771.             dc.w     $AAAA
  4772.         EndM
  4773.     ELSE
  4774.         IMPORT    QTRemoveChildren
  4775.     ENDIF
  4776.  
  4777. ; replacement must be same type as target
  4778. ;
  4779. ; pascal OSErr QTReplaceAtom(QTAtomContainer targetContainer, QTAtom targetAtom, QTAtomContainer replacementContainer, QTAtom replacementAtom)
  4780. ;
  4781.     IF ¬ GENERATINGCFM THEN
  4782.         Macro
  4783.         _QTReplaceAtom
  4784.             move.w    #$21C,d0
  4785.             dc.w     $AAAA
  4786.         EndM
  4787.     ELSE
  4788.         IMPORT    QTReplaceAtom
  4789.     ENDIF
  4790.  
  4791. ;
  4792. ; pascal OSErr QTSwapAtoms(QTAtomContainer container, QTAtom atom1, QTAtom atom2)
  4793. ;
  4794.     IF ¬ GENERATINGCFM THEN
  4795.         Macro
  4796.         _QTSwapAtoms
  4797.             move.w    #$1FF,d0
  4798.             dc.w     $AAAA
  4799.         EndM
  4800.     ELSE
  4801.         IMPORT    QTSwapAtoms
  4802.     ENDIF
  4803.  
  4804. ;
  4805. ; pascal OSErr QTSetAtomID(QTAtomContainer container, QTAtom atom, QTAtomID newID)
  4806. ;
  4807.     IF ¬ GENERATINGCFM THEN
  4808.         Macro
  4809.         _QTSetAtomID
  4810.             move.w    #$231,d0
  4811.             dc.w     $AAAA
  4812.         EndM
  4813.     ELSE
  4814.         IMPORT    QTSetAtomID
  4815.     ENDIF
  4816.  
  4817. ;
  4818. ; pascal OSErr SetMediaPropertyAtom(Media theMedia, QTAtomContainer propertyAtom)
  4819. ;
  4820.     IF ¬ GENERATINGCFM THEN
  4821.         Macro
  4822.         _SetMediaPropertyAtom
  4823.             move.w    #$22E,d0
  4824.             dc.w     $AAAA
  4825.         EndM
  4826.     ELSE
  4827.         IMPORT    SetMediaPropertyAtom
  4828.     ENDIF
  4829.  
  4830. ;
  4831. ; pascal OSErr GetMediaPropertyAtom(Media theMedia, QTAtomContainer *propertyAtom)
  4832. ;
  4833.     IF ¬ GENERATINGCFM THEN
  4834.         Macro
  4835.         _GetMediaPropertyAtom
  4836.             move.w    #$22F,d0
  4837.             dc.w     $AAAA
  4838.         EndM
  4839.     ELSE
  4840.         IMPORT    GetMediaPropertyAtom
  4841.     ENDIF
  4842.  
  4843. invalidSpriteWorldPropertyErr    EQU        -2064
  4844. invalidSpritePropertyErr        EQU        -2065
  4845. gWorldsNotSameDepthAndSizeErr    EQU        -2066
  4846. invalidSpriteIndexErr            EQU        -2067
  4847. invalidImageIndexErr            EQU        -2068
  4848.  
  4849. cannotFindAtomErr                EQU        -2101
  4850. notLeafAtomErr                    EQU        -2102
  4851. atomsNotOfSameTypeErr            EQU        -2103
  4852. atomIndexInvalidErr                EQU        -2104
  4853. duplicateAtomTypeAndIDErr        EQU        -2105
  4854. invalidAtomErr                    EQU        -2106
  4855. invalidAtomContainerErr            EQU        -2107
  4856. invalidAtomTypeErr                EQU        -2108
  4857.  
  4858. MovieControllerComponentType    EQU        'play'
  4859.  
  4860. ; typedef ComponentInstance  MovieController
  4861.  
  4862. mcActionIdle                    EQU        1                    ; no param
  4863. mcActionDraw                    EQU        2                    ; param is WindowPtr
  4864. mcActionActivate                EQU        3                    ; no param
  4865. mcActionDeactivate                EQU        4                    ; no param
  4866. mcActionMouseDown                EQU        5                    ; param is pointer to EventRecord
  4867. mcActionKey                        EQU        6                    ; param is pointer to EventRecord
  4868. mcActionPlay                    EQU        8                    ; param is Fixed, play rate
  4869. mcActionGoToTime                EQU        12                    ; param is TimeRecord
  4870. mcActionSetVolume                EQU        14                    ; param is a short
  4871. mcActionGetVolume                EQU        15                    ; param is pointer to a short
  4872. mcActionStep                    EQU        18                    ; param is number of steps (short)
  4873. mcActionSetLooping                EQU        21                    ; param is Boolean
  4874. mcActionGetLooping                EQU        22                    ; param is pointer to a Boolean
  4875. mcActionSetLoopIsPalindrome        EQU        23                    ; param is Boolean
  4876. mcActionGetLoopIsPalindrome        EQU        24                    ; param is pointer to a Boolean
  4877. mcActionSetGrowBoxBounds        EQU        25                    ; param is a Rect
  4878. mcActionControllerSizeChanged    EQU        26                    ; no param
  4879. mcActionSetSelectionBegin        EQU        29                    ; param is TimeRecord
  4880. mcActionSetSelectionDuration    EQU        30                    ; param is TimeRecord, action only taken on set-duration
  4881. mcActionSetKeysEnabled            EQU        32                    ; param is Boolean
  4882. mcActionGetKeysEnabled            EQU        33                    ; param is pointer to Boolean
  4883. mcActionSetPlaySelection        EQU        34                    ; param is Boolean
  4884. mcActionGetPlaySelection        EQU        35                    ; param is pointer to Boolean
  4885. mcActionSetUseBadge                EQU        36                    ; param is Boolean
  4886. mcActionGetUseBadge                EQU        37                    ; param is pointer to Boolean
  4887. mcActionSetFlags                EQU        38                    ; param is long of flags
  4888. mcActionGetFlags                EQU        39                    ; param is pointer to a long of flags
  4889. mcActionSetPlayEveryFrame        EQU        40                    ; param is Boolean
  4890. mcActionGetPlayEveryFrame        EQU        41                    ; param is pointer to Boolean
  4891. mcActionGetPlayRate                EQU        42                    ; param is pointer to Fixed
  4892. mcActionShowBalloon                EQU        43                    ; param is a pointer to a boolean. set to false to stop balloon
  4893. mcActionBadgeClick                EQU        44                    ; param is pointer to Boolean. set to false to ignore click
  4894. mcActionMovieClick                EQU        45                    ; param is pointer to event record. change “what” to nullEvt to kill click
  4895. mcActionSuspend                    EQU        46                    ; no param
  4896. mcActionResume                    EQU        47                    ; no param
  4897. mcActionSetControllerKeysEnabled EQU        48                    ; param is Boolean
  4898. mcActionGetTimeSliderRect        EQU        49                    ; param is pointer to rect
  4899. mcActionMovieEdited                EQU        50                    ; no param
  4900. mcActionGetDragEnabled            EQU        51                    ; param is pointer to Boolean
  4901. mcActionSetDragEnabled            EQU        52                    ; param is Boolean
  4902. mcActionGetSelectionBegin        EQU        53                    ; param is TimeRecord
  4903. mcActionGetSelectionDuration    EQU        54                    ; param is TimeRecord
  4904. mcActionPrerollAndPlay            EQU        55                    ; param is Fixed, play rate
  4905. mcActionGetCursorSettingEnabled    EQU        56                    ; param is pointer to Boolean
  4906. mcActionSetCursorSettingEnabled    EQU        57                    ; param is Boolean
  4907.  
  4908. ; typedef short             mcAction
  4909.  
  4910. mcFlagSuppressMovieFrame        EQU        1 << 0
  4911. mcFlagSuppressStepButtons        EQU        1 << 1
  4912. mcFlagSuppressSpeakerButton        EQU        1 << 2
  4913. mcFlagsUseWindowPalette            EQU        1 << 3
  4914. mcFlagsDontInvalidate            EQU        1 << 4
  4915.  
  4916. mcPositionDontInvalidate        EQU        1 << 5
  4917.  
  4918. ; typedef unsigned long     mcFlags
  4919.  
  4920. mcInfoUndoAvailable                EQU        1 << 0
  4921. mcInfoCutAvailable                EQU        1 << 1
  4922. mcInfoCopyAvailable                EQU        1 << 2
  4923. mcInfoPasteAvailable            EQU        1 << 3
  4924. mcInfoClearAvailable            EQU        1 << 4
  4925. mcInfoHasSound                    EQU        1 << 5
  4926. mcInfoIsPlaying                    EQU        1 << 6
  4927. mcInfoIsLooping                    EQU        1 << 7
  4928. mcInfoIsInPalindrome            EQU        1 << 8
  4929. mcInfoEditingEnabled            EQU        1 << 9
  4930. mcInfoMovieIsInteractive        EQU        1 << 10
  4931.  
  4932. ; menu item codes
  4933. mcMenuUndo                        EQU        1
  4934. mcMenuCut                        EQU        3
  4935. mcMenuCopy                        EQU        4
  4936. mcMenuPaste                        EQU        5
  4937. mcMenuClear                        EQU        6
  4938.  
  4939. ; target management 
  4940. ;
  4941. ; pascal ComponentResult MCSetMovie(MovieController mc, Movie theMovie, WindowPtr movieWindow, Point where)
  4942. ;
  4943.     IF ¬ GENERATINGCFM THEN
  4944.         Macro
  4945.         _MCSetMovie
  4946.             dc.w     $2F3C
  4947.             dc.w     $000C
  4948.             dc.w     $0002
  4949.             moveq    #0,d0
  4950.             dc.w     $A82A
  4951.         EndM
  4952.     ELSE
  4953.         IMPORT    MCSetMovie
  4954.     ENDIF
  4955.  
  4956. ;
  4957. ; pascal Movie MCGetIndMovie(MovieController mc, short index)
  4958. ;
  4959.     IF ¬ GENERATINGCFM THEN
  4960.         Macro
  4961.         _MCGetIndMovie
  4962.             dc.w     $2F3C
  4963.             dc.w     $0002
  4964.             dc.w     $0005
  4965.             moveq    #0,d0
  4966.             dc.w     $A82A
  4967.         EndM
  4968.     ELSE
  4969.         IMPORT    MCGetIndMovie
  4970.     ENDIF
  4971.  
  4972. ;
  4973. ; pascal Movie MCGetMovieExtended(MovieController mc, short index)
  4974. ;
  4975.     IF ¬ GENERATINGCFM THEN
  4976.         Macro
  4977.         _MCGetMovieExtended
  4978.             dc.w     $2F3C
  4979.             dc.w     $0002
  4980.             dc.w     $0005
  4981.             moveq    #0,d0
  4982.             dc.w     $A82A
  4983.         EndM
  4984.     ELSE
  4985.         IMPORT    MCGetMovieExtended
  4986.     ENDIF
  4987.  
  4988. ;
  4989. ; pascal ComponentResult MCRemoveMovie(MovieController mc)
  4990. ;
  4991.     IF ¬ GENERATINGCFM THEN
  4992.         Macro
  4993.         _MCRemoveMovie
  4994.             dc.w     $2F3C
  4995.             dc.w     $0000
  4996.             dc.w     $0006
  4997.             moveq    #0,d0
  4998.             dc.w     $A82A
  4999.         EndM
  5000.     ELSE
  5001.         IMPORT    MCRemoveMovie
  5002.     ENDIF
  5003.  
  5004. ; event handling etc. 
  5005. ;
  5006. ; pascal ComponentResult MCIsPlayerEvent(MovieController mc, const EventRecord *e)
  5007. ;
  5008.     IF ¬ GENERATINGCFM THEN
  5009.         Macro
  5010.         _MCIsPlayerEvent
  5011.             dc.w     $2F3C
  5012.             dc.w     $0004
  5013.             dc.w     $0007
  5014.             moveq    #0,d0
  5015.             dc.w     $A82A
  5016.         EndM
  5017.     ELSE
  5018.         IMPORT    MCIsPlayerEvent
  5019.     ENDIF
  5020.  
  5021. ; obsolete. use MCSetActionFilterWithRefCon instead. 
  5022. ;
  5023. ; pascal ComponentResult MCSetActionFilter(MovieController mc, MCActionFilterUPP blob)
  5024. ;
  5025.     IF ¬ GENERATINGCFM THEN
  5026.         Macro
  5027.         _MCSetActionFilter
  5028.             dc.w     $2F3C
  5029.             dc.w     $0004
  5030.             dc.w     $0008
  5031.             moveq    #0,d0
  5032.             dc.w     $A82A
  5033.         EndM
  5034.     ELSE
  5035.         IMPORT    MCSetActionFilter
  5036.     ENDIF
  5037.  
  5038. ;
  5039. ;    proc is of the form:
  5040. ;        Boolean userPlayerFilter(MovieController mc, short *action, void *params) =
  5041. ;    proc returns TRUE if it handles the action, FALSE if not
  5042. ;    action is passed as a VAR so that it could be changed by filter (ick)
  5043. ;    this is consistent with the current dialog manager stuff
  5044. ;    params is any potential parameters that go with the action <triple ick> 
  5045. ;        such as set playback rate to xxx.
  5046. ;
  5047. ;
  5048. ; pascal ComponentResult MCDoAction(MovieController mc, short action, void *params)
  5049. ;
  5050.     IF ¬ GENERATINGCFM THEN
  5051.         Macro
  5052.         _MCDoAction
  5053.             dc.w     $2F3C
  5054.             dc.w     $0006
  5055.             dc.w     $0009
  5056.             moveq    #0,d0
  5057.             dc.w     $A82A
  5058.         EndM
  5059.     ELSE
  5060.         IMPORT    MCDoAction
  5061.     ENDIF
  5062.  
  5063. ; state type things 
  5064. ;
  5065. ; pascal ComponentResult MCSetControllerAttached(MovieController mc, Boolean attach)
  5066. ;
  5067.     IF ¬ GENERATINGCFM THEN
  5068.         Macro
  5069.         _MCSetControllerAttached
  5070.             dc.w     $2F3C
  5071.             dc.w     $0002
  5072.             dc.w     $000A
  5073.             moveq    #0,d0
  5074.             dc.w     $A82A
  5075.         EndM
  5076.     ELSE
  5077.         IMPORT    MCSetControllerAttached
  5078.     ENDIF
  5079.  
  5080. ;
  5081. ; pascal ComponentResult MCIsControllerAttached(MovieController mc)
  5082. ;
  5083.     IF ¬ GENERATINGCFM THEN
  5084.         Macro
  5085.         _MCIsControllerAttached
  5086.             dc.w     $2F3C
  5087.             dc.w     $0000
  5088.             dc.w     $000B
  5089.             moveq    #0,d0
  5090.             dc.w     $A82A
  5091.         EndM
  5092.     ELSE
  5093.         IMPORT    MCIsControllerAttached
  5094.     ENDIF
  5095.  
  5096. ;
  5097. ; pascal ComponentResult MCSetControllerPort(MovieController mc, CGrafPtr gp)
  5098. ;
  5099.     IF ¬ GENERATINGCFM THEN
  5100.         Macro
  5101.         _MCSetControllerPort
  5102.             dc.w     $2F3C
  5103.             dc.w     $0004
  5104.             dc.w     $000C
  5105.             moveq    #0,d0
  5106.             dc.w     $A82A
  5107.         EndM
  5108.     ELSE
  5109.         IMPORT    MCSetControllerPort
  5110.     ENDIF
  5111.  
  5112. ;
  5113. ; pascal CGrafPtr MCGetControllerPort(MovieController mc)
  5114. ;
  5115.     IF ¬ GENERATINGCFM THEN
  5116.         Macro
  5117.         _MCGetControllerPort
  5118.             dc.w     $2F3C
  5119.             dc.w     $0000
  5120.             dc.w     $000D
  5121.             moveq    #0,d0
  5122.             dc.w     $A82A
  5123.         EndM
  5124.     ELSE
  5125.         IMPORT    MCGetControllerPort
  5126.     ENDIF
  5127.  
  5128. ;
  5129. ; pascal ComponentResult MCSetVisible(MovieController mc, Boolean visible)
  5130. ;
  5131.     IF ¬ GENERATINGCFM THEN
  5132.         Macro
  5133.         _MCSetVisible
  5134.             dc.w     $2F3C
  5135.             dc.w     $0002
  5136.             dc.w     $000E
  5137.             moveq    #0,d0
  5138.             dc.w     $A82A
  5139.         EndM
  5140.     ELSE
  5141.         IMPORT    MCSetVisible
  5142.     ENDIF
  5143.  
  5144. ;
  5145. ; pascal ComponentResult MCGetVisible(MovieController mc)
  5146. ;
  5147.     IF ¬ GENERATINGCFM THEN
  5148.         Macro
  5149.         _MCGetVisible
  5150.             dc.w     $2F3C
  5151.             dc.w     $0000
  5152.             dc.w     $000F
  5153.             moveq    #0,d0
  5154.             dc.w     $A82A
  5155.         EndM
  5156.     ELSE
  5157.         IMPORT    MCGetVisible
  5158.     ENDIF
  5159.  
  5160. ;
  5161. ; pascal ComponentResult MCGetControllerBoundsRect(MovieController mc, Rect *bounds)
  5162. ;
  5163.     IF ¬ GENERATINGCFM THEN
  5164.         Macro
  5165.         _MCGetControllerBoundsRect
  5166.             dc.w     $2F3C
  5167.             dc.w     $0004
  5168.             dc.w     $0010
  5169.             moveq    #0,d0
  5170.             dc.w     $A82A
  5171.         EndM
  5172.     ELSE
  5173.         IMPORT    MCGetControllerBoundsRect
  5174.     ENDIF
  5175.  
  5176. ;
  5177. ; pascal ComponentResult MCSetControllerBoundsRect(MovieController mc, const Rect *bounds)
  5178. ;
  5179.     IF ¬ GENERATINGCFM THEN
  5180.         Macro
  5181.         _MCSetControllerBoundsRect
  5182.             dc.w     $2F3C
  5183.             dc.w     $0004
  5184.             dc.w     $0011
  5185.             moveq    #0,d0
  5186.             dc.w     $A82A
  5187.         EndM
  5188.     ELSE
  5189.         IMPORT    MCSetControllerBoundsRect
  5190.     ENDIF
  5191.  
  5192. ;
  5193. ; pascal RgnHandle MCGetControllerBoundsRgn(MovieController mc)
  5194. ;
  5195.     IF ¬ GENERATINGCFM THEN
  5196.         Macro
  5197.         _MCGetControllerBoundsRgn
  5198.             dc.w     $2F3C
  5199.             dc.w     $0000
  5200.             dc.w     $0012
  5201.             moveq    #0,d0
  5202.             dc.w     $A82A
  5203.         EndM
  5204.     ELSE
  5205.         IMPORT    MCGetControllerBoundsRgn
  5206.     ENDIF
  5207.  
  5208. ;
  5209. ; pascal RgnHandle MCGetWindowRgn(MovieController mc, WindowPtr w)
  5210. ;
  5211.     IF ¬ GENERATINGCFM THEN
  5212.         Macro
  5213.         _MCGetWindowRgn
  5214.             dc.w     $2F3C
  5215.             dc.w     $0004
  5216.             dc.w     $0013
  5217.             moveq    #0,d0
  5218.             dc.w     $A82A
  5219.         EndM
  5220.     ELSE
  5221.         IMPORT    MCGetWindowRgn
  5222.     ENDIF
  5223.  
  5224. ; other stuff 
  5225. ;
  5226. ; pascal ComponentResult MCMovieChanged(MovieController mc, Movie m)
  5227. ;
  5228.     IF ¬ GENERATINGCFM THEN
  5229.         Macro
  5230.         _MCMovieChanged
  5231.             dc.w     $2F3C
  5232.             dc.w     $0004
  5233.             dc.w     $0014
  5234.             moveq    #0,d0
  5235.             dc.w     $A82A
  5236.         EndM
  5237.     ELSE
  5238.         IMPORT    MCMovieChanged
  5239.     ENDIF
  5240.  
  5241. ;
  5242. ;    called when the app has changed thing about the movie (like bounding rect) or rate. So that we
  5243. ;        can update our graphical (and internal) state accordingly.
  5244. ;
  5245. ;
  5246. ; pascal ComponentResult MCSetDuration(MovieController mc, TimeValue duration)
  5247. ;
  5248.     IF ¬ GENERATINGCFM THEN
  5249.         Macro
  5250.         _MCSetDuration
  5251.             dc.w     $2F3C
  5252.             dc.w     $0004
  5253.             dc.w     $0015
  5254.             moveq    #0,d0
  5255.             dc.w     $A82A
  5256.         EndM
  5257.     ELSE
  5258.         IMPORT    MCSetDuration
  5259.     ENDIF
  5260.  
  5261. ;
  5262. ;    duration to use for time slider -- will be reset next time MCMovieChanged is called
  5263. ;        or MCSetMovie is called
  5264. ;
  5265. ;
  5266. ; pascal TimeValue MCGetCurrentTime(MovieController mc, TimeScale *scale)
  5267. ;
  5268.     IF ¬ GENERATINGCFM THEN
  5269.         Macro
  5270.         _MCGetCurrentTime
  5271.             dc.w     $2F3C
  5272.             dc.w     $0004
  5273.             dc.w     $0016
  5274.             moveq    #0,d0
  5275.             dc.w     $A82A
  5276.         EndM
  5277.     ELSE
  5278.         IMPORT    MCGetCurrentTime
  5279.     ENDIF
  5280.  
  5281. ;
  5282. ;    returns the time value and the time scale it is on. if there are no movies, the
  5283. ;        time scale is passed back as 0. scale is an optional parameter
  5284. ;
  5285. ;
  5286. ;
  5287. ; pascal ComponentResult MCNewAttachedController(MovieController mc, Movie theMovie, WindowPtr w, Point where)
  5288. ;
  5289.     IF ¬ GENERATINGCFM THEN
  5290.         Macro
  5291.         _MCNewAttachedController
  5292.             dc.w     $2F3C
  5293.             dc.w     $000C
  5294.             dc.w     $0017
  5295.             moveq    #0,d0
  5296.             dc.w     $A82A
  5297.         EndM
  5298.     ELSE
  5299.         IMPORT    MCNewAttachedController
  5300.     ENDIF
  5301.  
  5302. ;
  5303. ;    makes m the only movie attached to the controller. makes the controller visible.
  5304. ;    the window and where parameters are passed a long to MCSetMovie and behave as
  5305. ;    described there
  5306. ;
  5307. ;
  5308. ; pascal ComponentResult MCDraw(MovieController mc, WindowPtr w)
  5309. ;
  5310.     IF ¬ GENERATINGCFM THEN
  5311.         Macro
  5312.         _MCDraw
  5313.             dc.w     $2F3C
  5314.             dc.w     $0004
  5315.             dc.w     $0018
  5316.             moveq    #0,d0
  5317.             dc.w     $A82A
  5318.         EndM
  5319.     ELSE
  5320.         IMPORT    MCDraw
  5321.     ENDIF
  5322.  
  5323. ;
  5324. ; pascal ComponentResult MCActivate(MovieController mc, WindowPtr w, Boolean activate)
  5325. ;
  5326.     IF ¬ GENERATINGCFM THEN
  5327.         Macro
  5328.         _MCActivate
  5329.             dc.w     $2F3C
  5330.             dc.w     $0006
  5331.             dc.w     $0019
  5332.             moveq    #0,d0
  5333.             dc.w     $A82A
  5334.         EndM
  5335.     ELSE
  5336.         IMPORT    MCActivate
  5337.     ENDIF
  5338.  
  5339. ;
  5340. ; pascal ComponentResult MCIdle(MovieController mc)
  5341. ;
  5342.     IF ¬ GENERATINGCFM THEN
  5343.         Macro
  5344.         _MCIdle
  5345.             dc.w     $2F3C
  5346.             dc.w     $0000
  5347.             dc.w     $001A
  5348.             moveq    #0,d0
  5349.             dc.w     $A82A
  5350.         EndM
  5351.     ELSE
  5352.         IMPORT    MCIdle
  5353.     ENDIF
  5354.  
  5355. ;
  5356. ; pascal ComponentResult MCKey(MovieController mc, SInt8 key, long modifiers)
  5357. ;
  5358.     IF ¬ GENERATINGCFM THEN
  5359.         Macro
  5360.         _MCKey
  5361.             dc.w     $2F3C
  5362.             dc.w     $0006
  5363.             dc.w     $001B
  5364.             moveq    #0,d0
  5365.             dc.w     $A82A
  5366.         EndM
  5367.     ELSE
  5368.         IMPORT    MCKey
  5369.     ENDIF
  5370.  
  5371. ;
  5372. ; pascal ComponentResult MCClick(MovieController mc, WindowPtr w, Point where, long when, long modifiers)
  5373. ;
  5374.     IF ¬ GENERATINGCFM THEN
  5375.         Macro
  5376.         _MCClick
  5377.             dc.w     $2F3C
  5378.             dc.w     $0010
  5379.             dc.w     $001C
  5380.             moveq    #0,d0
  5381.             dc.w     $A82A
  5382.         EndM
  5383.     ELSE
  5384.         IMPORT    MCClick
  5385.     ENDIF
  5386.  
  5387. ;
  5388. ;    calls for editing
  5389. ;
  5390. ;
  5391. ; pascal ComponentResult MCEnableEditing(MovieController mc, Boolean enabled)
  5392. ;
  5393.     IF ¬ GENERATINGCFM THEN
  5394.         Macro
  5395.         _MCEnableEditing
  5396.             dc.w     $2F3C
  5397.             dc.w     $0002
  5398.             dc.w     $001D
  5399.             moveq    #0,d0
  5400.             dc.w     $A82A
  5401.         EndM
  5402.     ELSE
  5403.         IMPORT    MCEnableEditing
  5404.     ENDIF
  5405.  
  5406. ;
  5407. ; pascal long MCIsEditingEnabled(MovieController mc)
  5408. ;
  5409.     IF ¬ GENERATINGCFM THEN
  5410.         Macro
  5411.         _MCIsEditingEnabled
  5412.             dc.w     $2F3C
  5413.             dc.w     $0000
  5414.             dc.w     $001E
  5415.             moveq    #0,d0
  5416.             dc.w     $A82A
  5417.         EndM
  5418.     ELSE
  5419.         IMPORT    MCIsEditingEnabled
  5420.     ENDIF
  5421.  
  5422. ;
  5423. ; pascal Movie MCCopy(MovieController mc)
  5424. ;
  5425.     IF ¬ GENERATINGCFM THEN
  5426.         Macro
  5427.         _MCCopy
  5428.             dc.w     $2F3C
  5429.             dc.w     $0000
  5430.             dc.w     $001F
  5431.             moveq    #0,d0
  5432.             dc.w     $A82A
  5433.         EndM
  5434.     ELSE
  5435.         IMPORT    MCCopy
  5436.     ENDIF
  5437.  
  5438. ;
  5439. ; pascal Movie MCCut(MovieController mc)
  5440. ;
  5441.     IF ¬ GENERATINGCFM THEN
  5442.         Macro
  5443.         _MCCut
  5444.             dc.w     $2F3C
  5445.             dc.w     $0000
  5446.             dc.w     $0020
  5447.             moveq    #0,d0
  5448.             dc.w     $A82A
  5449.         EndM
  5450.     ELSE
  5451.         IMPORT    MCCut
  5452.     ENDIF
  5453.  
  5454. ;
  5455. ; pascal ComponentResult MCPaste(MovieController mc, Movie srcMovie)
  5456. ;
  5457.     IF ¬ GENERATINGCFM THEN
  5458.         Macro
  5459.         _MCPaste
  5460.             dc.w     $2F3C
  5461.             dc.w     $0004
  5462.             dc.w     $0021
  5463.             moveq    #0,d0
  5464.             dc.w     $A82A
  5465.         EndM
  5466.     ELSE
  5467.         IMPORT    MCPaste
  5468.     ENDIF
  5469.  
  5470. ;
  5471. ; pascal ComponentResult MCClear(MovieController mc)
  5472. ;
  5473.     IF ¬ GENERATINGCFM THEN
  5474.         Macro
  5475.         _MCClear
  5476.             dc.w     $2F3C
  5477.             dc.w     $0000
  5478.             dc.w     $0022
  5479.             moveq    #0,d0
  5480.             dc.w     $A82A
  5481.         EndM
  5482.     ELSE
  5483.         IMPORT    MCClear
  5484.     ENDIF
  5485.  
  5486. ;
  5487. ; pascal ComponentResult MCUndo(MovieController mc)
  5488. ;
  5489.     IF ¬ GENERATINGCFM THEN
  5490.         Macro
  5491.         _MCUndo
  5492.             dc.w     $2F3C
  5493.             dc.w     $0000
  5494.             dc.w     $0023
  5495.             moveq    #0,d0
  5496.             dc.w     $A82A
  5497.         EndM
  5498.     ELSE
  5499.         IMPORT    MCUndo
  5500.     ENDIF
  5501.  
  5502. ;
  5503. ; *    somewhat special stuff
  5504. ; 
  5505. ;
  5506. ; pascal ComponentResult MCPositionController(MovieController mc, const Rect *movieRect, const Rect *controllerRect, long someFlags)
  5507. ;
  5508.     IF ¬ GENERATINGCFM THEN
  5509.         Macro
  5510.         _MCPositionController
  5511.             dc.w     $2F3C
  5512.             dc.w     $000C
  5513.             dc.w     $0024
  5514.             moveq    #0,d0
  5515.             dc.w     $A82A
  5516.         EndM
  5517.     ELSE
  5518.         IMPORT    MCPositionController
  5519.     ENDIF
  5520.  
  5521. ;
  5522. ; pascal ComponentResult MCGetControllerInfo(MovieController mc, long *someFlags)
  5523. ;
  5524.     IF ¬ GENERATINGCFM THEN
  5525.         Macro
  5526.         _MCGetControllerInfo
  5527.             dc.w     $2F3C
  5528.             dc.w     $0004
  5529.             dc.w     $0025
  5530.             moveq    #0,d0
  5531.             dc.w     $A82A
  5532.         EndM
  5533.     ELSE
  5534.         IMPORT    MCGetControllerInfo
  5535.     ENDIF
  5536.  
  5537. ;
  5538. ; pascal ComponentResult MCSetClip(MovieController mc, RgnHandle theClip, RgnHandle movieClip)
  5539. ;
  5540.     IF ¬ GENERATINGCFM THEN
  5541.         Macro
  5542.         _MCSetClip
  5543.             dc.w     $2F3C
  5544.             dc.w     $0008
  5545.             dc.w     $0028
  5546.             moveq    #0,d0
  5547.             dc.w     $A82A
  5548.         EndM
  5549.     ELSE
  5550.         IMPORT    MCSetClip
  5551.     ENDIF
  5552.  
  5553. ;
  5554. ; pascal ComponentResult MCGetClip(MovieController mc, RgnHandle *theClip, RgnHandle *movieClip)
  5555. ;
  5556.     IF ¬ GENERATINGCFM THEN
  5557.         Macro
  5558.         _MCGetClip
  5559.             dc.w     $2F3C
  5560.             dc.w     $0008
  5561.             dc.w     $0029
  5562.             moveq    #0,d0
  5563.             dc.w     $A82A
  5564.         EndM
  5565.     ELSE
  5566.         IMPORT    MCGetClip
  5567.     ENDIF
  5568.  
  5569. ;
  5570. ; pascal ComponentResult MCDrawBadge(MovieController mc, RgnHandle movieRgn, RgnHandle *badgeRgn)
  5571. ;
  5572.     IF ¬ GENERATINGCFM THEN
  5573.         Macro
  5574.         _MCDrawBadge
  5575.             dc.w     $2F3C
  5576.             dc.w     $0008
  5577.             dc.w     $002A
  5578.             moveq    #0,d0
  5579.             dc.w     $A82A
  5580.         EndM
  5581.     ELSE
  5582.         IMPORT    MCDrawBadge
  5583.     ENDIF
  5584.  
  5585. ;
  5586. ; pascal ComponentResult MCSetUpEditMenu(MovieController mc, long modifiers, MenuHandle mh)
  5587. ;
  5588.     IF ¬ GENERATINGCFM THEN
  5589.         Macro
  5590.         _MCSetUpEditMenu
  5591.             dc.w     $2F3C
  5592.             dc.w     $0008
  5593.             dc.w     $002B
  5594.             moveq    #0,d0
  5595.             dc.w     $A82A
  5596.         EndM
  5597.     ELSE
  5598.         IMPORT    MCSetUpEditMenu
  5599.     ENDIF
  5600.  
  5601. ;
  5602. ; pascal ComponentResult MCGetMenuString(MovieController mc, long modifiers, short item, Str255 aString)
  5603. ;
  5604.     IF ¬ GENERATINGCFM THEN
  5605.         Macro
  5606.         _MCGetMenuString
  5607.             dc.w     $2F3C
  5608.             dc.w     $000A
  5609.             dc.w     $002C
  5610.             moveq    #0,d0
  5611.             dc.w     $A82A
  5612.         EndM
  5613.     ELSE
  5614.         IMPORT    MCGetMenuString
  5615.     ENDIF
  5616.  
  5617. ;
  5618. ; pascal ComponentResult MCSetActionFilterWithRefCon(MovieController mc, MCActionFilterWithRefConUPP blob, long refCon)
  5619. ;
  5620.     IF ¬ GENERATINGCFM THEN
  5621.         Macro
  5622.         _MCSetActionFilterWithRefCon
  5623.             dc.w     $2F3C
  5624.             dc.w     $0008
  5625.             dc.w     $002D
  5626.             moveq    #0,d0
  5627.             dc.w     $A82A
  5628.         EndM
  5629.     ELSE
  5630.         IMPORT    MCSetActionFilterWithRefCon
  5631.     ENDIF
  5632.  
  5633. ;
  5634. ; pascal ComponentResult MCPtInController(MovieController mc, Point thePt, Boolean *inController)
  5635. ;
  5636.     IF ¬ GENERATINGCFM THEN
  5637.         Macro
  5638.         _MCPtInController
  5639.             dc.w     $2F3C
  5640.             dc.w     $0008
  5641.             dc.w     $002E
  5642.             moveq    #0,d0
  5643.             dc.w     $A82A
  5644.         EndM
  5645.     ELSE
  5646.         IMPORT    MCPtInController
  5647.     ENDIF
  5648.  
  5649. kMCSetMovieSelect                EQU        $2
  5650. kMCGetIndMovieSelect            EQU        $5
  5651. kMCGetMovieExtendedSelect        EQU        $5
  5652. kMCRemoveMovieSelect            EQU        $6
  5653. kMCIsPlayerEventSelect            EQU        $7
  5654. kMCSetActionFilterSelect        EQU        $8
  5655. kMCDoActionSelect                EQU        $9
  5656. kMCSetControllerAttachedSelect    EQU        $A
  5657. kMCIsControllerAttachedSelect    EQU        $B
  5658. kMCSetControllerPortSelect        EQU        $C
  5659. kMCGetControllerPortSelect        EQU        $D
  5660. kMCSetVisibleSelect                EQU        $E
  5661. kMCGetVisibleSelect                EQU        $F
  5662. kMCGetControllerBoundsRectSelect EQU        $10
  5663. kMCSetControllerBoundsRectSelect EQU        $11
  5664. kMCGetControllerBoundsRgnSelect    EQU        $12
  5665. kMCGetWindowRgnSelect            EQU        $13
  5666. kMCMovieChangedSelect            EQU        $14
  5667. kMCSetDurationSelect            EQU        $15
  5668. kMCGetCurrentTimeSelect            EQU        $16
  5669. kMCNewAttachedControllerSelect    EQU        $17
  5670. kMCDrawSelect                    EQU        $18
  5671. kMCActivateSelect                EQU        $19
  5672. kMCIdleSelect                    EQU        $1A
  5673. kMCKeySelect                    EQU        $1B
  5674. kMCClickSelect                    EQU        $1C
  5675. kMCEnableEditingSelect            EQU        $1D
  5676. kMCIsEditingEnabledSelect        EQU        $1E
  5677. kMCCopySelect                    EQU        $1F
  5678. kMCCutSelect                    EQU        $20
  5679. kMCPasteSelect                    EQU        $21
  5680. kMCClearSelect                    EQU        $22
  5681. kMCUndoSelect                    EQU        $23
  5682. kMCPositionControllerSelect        EQU        $24
  5683. kMCGetControllerInfoSelect        EQU        $25
  5684. kMCSetClipSelect                EQU        $28
  5685. kMCGetClipSelect                EQU        $29
  5686. kMCDrawBadgeSelect                EQU        $2A
  5687. kMCSetUpEditMenuSelect            EQU        $2B
  5688. kMCGetMenuStringSelect            EQU        $2C
  5689. kMCSetActionFilterWithRefConSelect EQU        $2D
  5690. kMCPtInControllerSelect            EQU        $2E
  5691.  
  5692. ;***************************************
  5693. ;*                                        *
  5694. ;*          T  I  M  E  B  A  S  E            *
  5695. ;*                                        *
  5696. ;***************************************
  5697. ;
  5698. ; pascal TimeBase NewTimeBase(void)
  5699. ;
  5700.     IF ¬ GENERATINGCFM THEN
  5701.         Macro
  5702.         _NewTimeBase
  5703.             move.w    #$A5,d0
  5704.             dc.w     $AAAA
  5705.         EndM
  5706.     ELSE
  5707.         IMPORT    NewTimeBase
  5708.     ENDIF
  5709.  
  5710. ;
  5711. ; pascal void DisposeTimeBase(TimeBase tb)
  5712. ;
  5713.     IF ¬ GENERATINGCFM THEN
  5714.         Macro
  5715.         _DisposeTimeBase
  5716.             move.w    #$B6,d0
  5717.             dc.w     $AAAA
  5718.         EndM
  5719.     ELSE
  5720.         IMPORT    DisposeTimeBase
  5721.     ENDIF
  5722.  
  5723. ;
  5724. ; pascal TimeValue GetTimeBaseTime(TimeBase tb, TimeScale s, TimeRecord *tr)
  5725. ;
  5726.     IF ¬ GENERATINGCFM THEN
  5727.         Macro
  5728.         _GetTimeBaseTime
  5729.             move.w    #$A6,d0
  5730.             dc.w     $AAAA
  5731.         EndM
  5732.     ELSE
  5733.         IMPORT    GetTimeBaseTime
  5734.     ENDIF
  5735.  
  5736. ;
  5737. ; pascal void SetTimeBaseTime(TimeBase tb, const TimeRecord *tr)
  5738. ;
  5739.     IF ¬ GENERATINGCFM THEN
  5740.         Macro
  5741.         _SetTimeBaseTime
  5742.             move.w    #$A7,d0
  5743.             dc.w     $AAAA
  5744.         EndM
  5745.     ELSE
  5746.         IMPORT    SetTimeBaseTime
  5747.     ENDIF
  5748.  
  5749. ;
  5750. ; pascal void SetTimeBaseValue(TimeBase tb, TimeValue t, TimeScale s)
  5751. ;
  5752.     IF ¬ GENERATINGCFM THEN
  5753.         Macro
  5754.         _SetTimeBaseValue
  5755.             move.w    #$A8,d0
  5756.             dc.w     $AAAA
  5757.         EndM
  5758.     ELSE
  5759.         IMPORT    SetTimeBaseValue
  5760.     ENDIF
  5761.  
  5762. ;
  5763. ; pascal Fixed GetTimeBaseRate(TimeBase tb)
  5764. ;
  5765.     IF ¬ GENERATINGCFM THEN
  5766.         Macro
  5767.         _GetTimeBaseRate
  5768.             move.w    #$A9,d0
  5769.             dc.w     $AAAA
  5770.         EndM
  5771.     ELSE
  5772.         IMPORT    GetTimeBaseRate
  5773.     ENDIF
  5774.  
  5775. ;
  5776. ; pascal void SetTimeBaseRate(TimeBase tb, Fixed r)
  5777. ;
  5778.     IF ¬ GENERATINGCFM THEN
  5779.         Macro
  5780.         _SetTimeBaseRate
  5781.             move.w    #$AA,d0
  5782.             dc.w     $AAAA
  5783.         EndM
  5784.     ELSE
  5785.         IMPORT    SetTimeBaseRate
  5786.     ENDIF
  5787.  
  5788. ;
  5789. ; pascal TimeValue GetTimeBaseStartTime(TimeBase tb, TimeScale s, TimeRecord *tr)
  5790. ;
  5791.     IF ¬ GENERATINGCFM THEN
  5792.         Macro
  5793.         _GetTimeBaseStartTime
  5794.             move.w    #$AB,d0
  5795.             dc.w     $AAAA
  5796.         EndM
  5797.     ELSE
  5798.         IMPORT    GetTimeBaseStartTime
  5799.     ENDIF
  5800.  
  5801. ;
  5802. ; pascal void SetTimeBaseStartTime(TimeBase tb, const TimeRecord *tr)
  5803. ;
  5804.     IF ¬ GENERATINGCFM THEN
  5805.         Macro
  5806.         _SetTimeBaseStartTime
  5807.             move.w    #$AC,d0
  5808.             dc.w     $AAAA
  5809.         EndM
  5810.     ELSE
  5811.         IMPORT    SetTimeBaseStartTime
  5812.     ENDIF
  5813.  
  5814. ;
  5815. ; pascal TimeValue GetTimeBaseStopTime(TimeBase tb, TimeScale s, TimeRecord *tr)
  5816. ;
  5817.     IF ¬ GENERATINGCFM THEN
  5818.         Macro
  5819.         _GetTimeBaseStopTime
  5820.             move.w    #$AD,d0
  5821.             dc.w     $AAAA
  5822.         EndM
  5823.     ELSE
  5824.         IMPORT    GetTimeBaseStopTime
  5825.     ENDIF
  5826.  
  5827. ;
  5828. ; pascal void SetTimeBaseStopTime(TimeBase tb, const TimeRecord *tr)
  5829. ;
  5830.     IF ¬ GENERATINGCFM THEN
  5831.         Macro
  5832.         _SetTimeBaseStopTime
  5833.             move.w    #$AE,d0
  5834.             dc.w     $AAAA
  5835.         EndM
  5836.     ELSE
  5837.         IMPORT    SetTimeBaseStopTime
  5838.     ENDIF
  5839.  
  5840. ;
  5841. ; pascal long GetTimeBaseFlags(TimeBase tb)
  5842. ;
  5843.     IF ¬ GENERATINGCFM THEN
  5844.         Macro
  5845.         _GetTimeBaseFlags
  5846.             move.w    #$B1,d0
  5847.             dc.w     $AAAA
  5848.         EndM
  5849.     ELSE
  5850.         IMPORT    GetTimeBaseFlags
  5851.     ENDIF
  5852.  
  5853. ;
  5854. ; pascal void SetTimeBaseFlags(TimeBase tb, long timeBaseFlags)
  5855. ;
  5856.     IF ¬ GENERATINGCFM THEN
  5857.         Macro
  5858.         _SetTimeBaseFlags
  5859.             move.w    #$B2,d0
  5860.             dc.w     $AAAA
  5861.         EndM
  5862.     ELSE
  5863.         IMPORT    SetTimeBaseFlags
  5864.     ENDIF
  5865.  
  5866. ;
  5867. ; pascal void SetTimeBaseMasterTimeBase(TimeBase slave, TimeBase master, const TimeRecord *slaveZero)
  5868. ;
  5869.     IF ¬ GENERATINGCFM THEN
  5870.         Macro
  5871.         _SetTimeBaseMasterTimeBase
  5872.             move.w    #$B4,d0
  5873.             dc.w     $AAAA
  5874.         EndM
  5875.     ELSE
  5876.         IMPORT    SetTimeBaseMasterTimeBase
  5877.     ENDIF
  5878.  
  5879. ;
  5880. ; pascal TimeBase GetTimeBaseMasterTimeBase(TimeBase tb)
  5881. ;
  5882.     IF ¬ GENERATINGCFM THEN
  5883.         Macro
  5884.         _GetTimeBaseMasterTimeBase
  5885.             move.w    #$AF,d0
  5886.             dc.w     $AAAA
  5887.         EndM
  5888.     ELSE
  5889.         IMPORT    GetTimeBaseMasterTimeBase
  5890.     ENDIF
  5891.  
  5892. ;
  5893. ; pascal void SetTimeBaseMasterClock(TimeBase slave, Component clockMeister, const TimeRecord *slaveZero)
  5894. ;
  5895.     IF ¬ GENERATINGCFM THEN
  5896.         Macro
  5897.         _SetTimeBaseMasterClock
  5898.             move.w    #$B3,d0
  5899.             dc.w     $AAAA
  5900.         EndM
  5901.     ELSE
  5902.         IMPORT    SetTimeBaseMasterClock
  5903.     ENDIF
  5904.  
  5905. ;
  5906. ; pascal ComponentInstance GetTimeBaseMasterClock(TimeBase tb)
  5907. ;
  5908.     IF ¬ GENERATINGCFM THEN
  5909.         Macro
  5910.         _GetTimeBaseMasterClock
  5911.             move.w    #$B0,d0
  5912.             dc.w     $AAAA
  5913.         EndM
  5914.     ELSE
  5915.         IMPORT    GetTimeBaseMasterClock
  5916.     ENDIF
  5917.  
  5918. ;
  5919. ; pascal void ConvertTime(TimeRecord *inout, TimeBase newBase)
  5920. ;
  5921.     IF ¬ GENERATINGCFM THEN
  5922.         Macro
  5923.         _ConvertTime
  5924.             move.w    #$B5,d0
  5925.             dc.w     $AAAA
  5926.         EndM
  5927.     ELSE
  5928.         IMPORT    ConvertTime
  5929.     ENDIF
  5930.  
  5931. ;
  5932. ; pascal void ConvertTimeScale(TimeRecord *inout, TimeScale newScale)
  5933. ;
  5934.     IF ¬ GENERATINGCFM THEN
  5935.         Macro
  5936.         _ConvertTimeScale
  5937.             move.w    #$B7,d0
  5938.             dc.w     $AAAA
  5939.         EndM
  5940.     ELSE
  5941.         IMPORT    ConvertTimeScale
  5942.     ENDIF
  5943.  
  5944. ;
  5945. ; pascal void AddTime(TimeRecord *dst, const TimeRecord *src)
  5946. ;
  5947.     IF ¬ GENERATINGCFM THEN
  5948.         Macro
  5949.         _AddTime
  5950.             move.w    #$10C,d0
  5951.             dc.w     $AAAA
  5952.         EndM
  5953.     ELSE
  5954.         IMPORT    AddTime
  5955.     ENDIF
  5956.  
  5957. ;
  5958. ; pascal void SubtractTime(TimeRecord *dst, const TimeRecord *src)
  5959. ;
  5960.     IF ¬ GENERATINGCFM THEN
  5961.         Macro
  5962.         _SubtractTime
  5963.             move.w    #$10D,d0
  5964.             dc.w     $AAAA
  5965.         EndM
  5966.     ELSE
  5967.         IMPORT    SubtractTime
  5968.     ENDIF
  5969.  
  5970. ;
  5971. ; pascal long GetTimeBaseStatus(TimeBase tb, TimeRecord *unpinnedTime)
  5972. ;
  5973.     IF ¬ GENERATINGCFM THEN
  5974.         Macro
  5975.         _GetTimeBaseStatus
  5976.             move.w    #$10B,d0
  5977.             dc.w     $AAAA
  5978.         EndM
  5979.     ELSE
  5980.         IMPORT    GetTimeBaseStatus
  5981.     ENDIF
  5982.  
  5983. ;
  5984. ; pascal void SetTimeBaseZero(TimeBase tb, TimeRecord *zero)
  5985. ;
  5986.     IF ¬ GENERATINGCFM THEN
  5987.         Macro
  5988.         _SetTimeBaseZero
  5989.             move.w    #$128,d0
  5990.             dc.w     $AAAA
  5991.         EndM
  5992.     ELSE
  5993.         IMPORT    SetTimeBaseZero
  5994.     ENDIF
  5995.  
  5996. ;
  5997. ; pascal Fixed GetTimeBaseEffectiveRate(TimeBase tb)
  5998. ;
  5999.     IF ¬ GENERATINGCFM THEN
  6000.         Macro
  6001.         _GetTimeBaseEffectiveRate
  6002.             move.w    #$124,d0
  6003.             dc.w     $AAAA
  6004.         EndM
  6005.     ELSE
  6006.         IMPORT    GetTimeBaseEffectiveRate
  6007.     ENDIF
  6008.  
  6009. ;***************************************
  6010. ;*                                        *
  6011. ;*          C  A  L  L  B  A  C  K             *
  6012. ;*                                        *
  6013. ;***************************************
  6014. ;
  6015. ; pascal QTCallBack NewCallBack(TimeBase tb, short cbType)
  6016. ;
  6017.     IF ¬ GENERATINGCFM THEN
  6018.         Macro
  6019.         _NewCallBack
  6020.             move.w    #$EB,d0
  6021.             dc.w     $AAAA
  6022.         EndM
  6023.     ELSE
  6024.         IMPORT    NewCallBack
  6025.     ENDIF
  6026.  
  6027. ;
  6028. ; pascal void DisposeCallBack(QTCallBack cb)
  6029. ;
  6030.     IF ¬ GENERATINGCFM THEN
  6031.         Macro
  6032.         _DisposeCallBack
  6033.             move.w    #$EC,d0
  6034.             dc.w     $AAAA
  6035.         EndM
  6036.     ELSE
  6037.         IMPORT    DisposeCallBack
  6038.     ENDIF
  6039.  
  6040. ;
  6041. ; pascal short GetCallBackType(QTCallBack cb)
  6042. ;
  6043.     IF ¬ GENERATINGCFM THEN
  6044.         Macro
  6045.         _GetCallBackType
  6046.             move.w    #$ED,d0
  6047.             dc.w     $AAAA
  6048.         EndM
  6049.     ELSE
  6050.         IMPORT    GetCallBackType
  6051.     ENDIF
  6052.  
  6053. ;
  6054. ; pascal TimeBase GetCallBackTimeBase(QTCallBack cb)
  6055. ;
  6056.     IF ¬ GENERATINGCFM THEN
  6057.         Macro
  6058.         _GetCallBackTimeBase
  6059.             move.w    #$EE,d0
  6060.             dc.w     $AAAA
  6061.         EndM
  6062.     ELSE
  6063.         IMPORT    GetCallBackTimeBase
  6064.     ENDIF
  6065.  
  6066. ;
  6067. ; pascal OSErr CallMeWhen(QTCallBack cb, QTCallBackUPP callBackProc, long refCon, long param1, long param2, long param3)
  6068. ;
  6069.     IF ¬ GENERATINGCFM THEN
  6070.         Macro
  6071.         _CallMeWhen
  6072.             move.w    #$B8,d0
  6073.             dc.w     $AAAA
  6074.         EndM
  6075.     ELSE
  6076.         IMPORT    CallMeWhen
  6077.     ENDIF
  6078.  
  6079. ;
  6080. ; pascal void CancelCallBack(QTCallBack cb)
  6081. ;
  6082.     IF ¬ GENERATINGCFM THEN
  6083.         Macro
  6084.         _CancelCallBack
  6085.             move.w    #$B9,d0
  6086.             dc.w     $AAAA
  6087.         EndM
  6088.     ELSE
  6089.         IMPORT    CancelCallBack
  6090.     ENDIF
  6091.  
  6092. ;***************************************
  6093. ;*                                        *
  6094. ;*          C L O C K   C A L L B A C K      *
  6095. ;*                S U P P O R T              *
  6096. ;*                                        *
  6097. ;***************************************
  6098. ;
  6099. ; pascal OSErr AddCallBackToTimeBase(QTCallBack cb)
  6100. ;
  6101.     IF ¬ GENERATINGCFM THEN
  6102.         Macro
  6103.         _AddCallBackToTimeBase
  6104.             move.w    #$129,d0
  6105.             dc.w     $AAAA
  6106.         EndM
  6107.     ELSE
  6108.         IMPORT    AddCallBackToTimeBase
  6109.     ENDIF
  6110.  
  6111. ;
  6112. ; pascal OSErr RemoveCallBackFromTimeBase(QTCallBack cb)
  6113. ;
  6114.     IF ¬ GENERATINGCFM THEN
  6115.         Macro
  6116.         _RemoveCallBackFromTimeBase
  6117.             move.w    #$12A,d0
  6118.             dc.w     $AAAA
  6119.         EndM
  6120.     ELSE
  6121.         IMPORT    RemoveCallBackFromTimeBase
  6122.     ENDIF
  6123.  
  6124. ;
  6125. ; pascal QTCallBack GetFirstCallBack(TimeBase tb)
  6126. ;
  6127.     IF ¬ GENERATINGCFM THEN
  6128.         Macro
  6129.         _GetFirstCallBack
  6130.             move.w    #$12B,d0
  6131.             dc.w     $AAAA
  6132.         EndM
  6133.     ELSE
  6134.         IMPORT    GetFirstCallBack
  6135.     ENDIF
  6136.  
  6137. ;
  6138. ; pascal QTCallBack GetNextCallBack(QTCallBack cb)
  6139. ;
  6140.     IF ¬ GENERATINGCFM THEN
  6141.         Macro
  6142.         _GetNextCallBack
  6143.             move.w    #$12C,d0
  6144.             dc.w     $AAAA
  6145.         EndM
  6146.     ELSE
  6147.         IMPORT    GetNextCallBack
  6148.     ENDIF
  6149.  
  6150. ;
  6151. ; pascal void ExecuteCallBack(QTCallBack cb)
  6152. ;
  6153.     IF ¬ GENERATINGCFM THEN
  6154.         Macro
  6155.         _ExecuteCallBack
  6156.             move.w    #$12D,d0
  6157.             dc.w     $AAAA
  6158.         EndM
  6159.     ELSE
  6160.         IMPORT    ExecuteCallBack
  6161.     ENDIF
  6162.  
  6163. ;***************************************
  6164. ;*                                        *
  6165. ;*          S Y N C    T A S K S              *
  6166. ;*                S U P P O R T              *
  6167. ;*                                        *
  6168. ;***************************************
  6169. ;
  6170. ; pascal OSErr QueueSyncTask(QTSyncTaskPtr task)
  6171. ;
  6172.     IF ¬ GENERATINGCFM THEN
  6173.         Macro
  6174.         _QueueSyncTask
  6175.             move.w    #$203,d0
  6176.             dc.w     $AAAA
  6177.         EndM
  6178.     ELSE
  6179.         IMPORT    QueueSyncTask
  6180.     ENDIF
  6181.  
  6182. ;
  6183. ; pascal OSErr DequeueSyncTask(QTSyncTaskPtr qElem)
  6184. ;
  6185.     IF ¬ GENERATINGCFM THEN
  6186.         Macro
  6187.         _DequeueSyncTask
  6188.             move.w    #$204,d0
  6189.             dc.w     $AAAA
  6190.         EndM
  6191.     ELSE
  6192.         IMPORT    DequeueSyncTask
  6193.     ENDIF
  6194.  
  6195. ; UPP call backs 
  6196.     ENDIF ; __MOVIES__
  6197.